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This reference publication contains specifications 
for the IBM Systera/360 Disk and Tape Operating 
Systems Assembler Language (including macro 
instructions and conditional assembly facilities). 

The assembler language is a symbolic 
programming language used to write programs for 
the IBM System/360. The language provides a 
convenient means for representing the machine 
instructions and related data necessary to program 
the IBM System/360. The IBM Systeon/360 Disk and 
Tape Operating Systems Assembler Programs process 
the language and provide auxiliary functions 
useful in the preparation and documentation of a 
program, and include facilities for processing 
macro instructions. 

Part 1 of this publication is an introduction 
to the assembler language. 

Part 2 describes the basic functions of the 
assembler language. 

Part 3 describes the conditional assembly and 
macro facilities in the assembler language. 










PREFACE 


This publication is a reference manual for 
the programmer using the assembler language 
(including macro instructions). 

Part 1 of this publication presents 
information common to all parte of the 
language. Part 2 contains specific infor¬ 
mation concerning the symbolic machine 
instruction codes and the assembler program 
functions provided for the programmer* s 
use. Part 3 of this publication describes 
the conditional assembly and macro facili¬ 
ties in the assembler language. 

Appendices A through J follow Part 3. 
Appendices A through F are associated with 
Parts 1 and 2 and present such items as a 
summary chart for constants (Appendix F), 
instruction listings, character set rep¬ 
resentations, and other aids to program¬ 
ming. Appendix G contains macro-facility 
summary charts, and Appendix H discusses 
table capacities for various elements of 
the language. Appendix I is a sample pro¬ 
gram. Appendix J is a features comparison 
chart of System/360 assemblers. Appendix K 
contains information required for assembling 
a program. Appendix L contains self-reloca¬ 
ting program techniques. 

Prerequisite for a thorough understanding 
of this publication is a basic knowledge of 
System/360 machine concepts. The publica¬ 
tions most closely related to this one are: 


1. IBM System/360 Principles of Operation , 
Form A22-6821. 


2. IBM System/360 Disk Operating System : 

Data Management Concepts , Form C24-3427, 
or ~ 

IBM System/360 Tape Operating System : 
Data Management Concepts , Form C24-3430. 

3. IBM System/360 Disk Operating System : 
Supervisor and Input/Output Macros, 

Form C24-5037 or 

IBM System/360 Tape Operating System : 
Supervisor and Input/Output Macros , 

Form C24-5035. 

4. IBM System/360 Disk Operating System : 
System Control and System Service Pro- 
grams , Form C24-5036 or 

IBM System/360 Tape Operating System: 
System Control and System Service Pro ¬ 
grams , Form C24-5034. 

5. IBM System/360 Disk Operating System : 
System Generation and Maintenance^ 

Form C24-5033 or 

IBM System/360 Tape Operating System: 
System Generation and Maintenance , 

Form C24-5015. 

6. IBM System/360 Disk and Tape Operating 
Systems Utility Macro Specifications, 
Form C24-5042. 

Titles and abstracts of other related 
publications are listed in the IBM 
System/360 Bibliography, Form A22-6822. 
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This publication, C24-3414-4, is a reprint of C24-3414-3, incorporating changes 
released in Technical Newsletters N26-0516, N26-0520, and N26-0533. 
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change will be reported in subsequent revisions or Technical Newsletters. 

• 
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PART 1 — INTRODUCTION TO THE ASSEMBLER LANGUAGE 


SECTION Is INTRODUCTION 


Computer programs may be expressed in 
machine language, i.e., language directly 
interpreted by the computer, or in a sym¬ 
bolic language, which is much more meaning¬ 
ful to the programmer. The symbolic lan¬ 
guage, however, must be translated into 
machine language before the computer can 
execute the program. This function is 
accomplished by an associated processing 
program called an assembler or a compiler. 


Of the various symbolic programming 
languages, assembler languages are closest 
to machine language in form and content. 

The assembler language discussed in this 
manual is a symbolic programming language 
for the IBM System/360. It enables the 
programmer to use all IBM System/360 
machine functions, as if he were coding in 
System/360 machine language. 

The assembler program that processes the 
language translates symbolic instructions 
into machine-language instructions, assigns 
storage locations, and performs auxiliary 
functions necessary to produce an executa¬ 
ble machine-language program. 


MACHINE FEATURES REQUIRED 

• 16,384 bytes of main storage. At least 
10,240 contiguous bytes must be availa¬ 
ble to the Assembler. Additional stor¬ 
age, if available to the Assembler, is 
used to allocate area for expanding 
Assembler tables. 

NOTE: If at least 14,336 contiguous 

bytes of storage are available to the 
assembler, a larger variant of the 
assembler can be incorporated. For 
details see Appendix K and the publica¬ 
tions for DOS and TOS system generation 
(see preface). 

• Standard instruction set 

• One I/O Channel (either multiplexor or 
selector) 

• One Card Reader (1442N1, 2501, 2520B1, 
or 2540) 1 

• One Card Punch (1442N1, 1442N2, 2520, 
or 2540)1, if punched output is 
desired 


• One Printer (1403, 1404 - continuous 
forms only, or 1443)1, if a printed 
listing is desired 

• One 1052 Printer-Keyboard 

• One 2311 Disk Storage Drive. This has 
the DOS resident system pack. 

or 

• One 2400-series Magnetic Tape Unit 
(either 7-track or 9-track). This has 
the TOS resident system. 

• Three work files. These can be: 

Three 2311 Disk Storage extents. (Disk 
system only.) These extents may be on 
the same device that contains the DOS 
resident system; 

or 

Three 2400-series Magnetic Tape Units 
(either 7-track or 9-track: If 7-track, 
the data conversion feature is required 
and the tape must be set converter on, 
translator off, odd parity). These can 
be used for either the disk or tape 
system. 

The assemble-and-execute option is 
an alternative to the DECK option; both 
are not supported for the same assem¬ 
bly. If the assemble-and-execute 
option is chosen, SYSLNK is a 
2400-series Magnetic Tape Unit (9-track 
or 7-track with the data conversion 
feature) for the tape-resident system, 
or a 2311 Disk Storage extent (which 
may be on the system resident device) 
for the disk-resident system. 

NOTE: Either 2401, 2402, 2403, 2404, 

or 2415 Magnetic Tape Units apply to 
any reference to 2400-series Magnetic 
Tape Units. 

COMP AT ABILITY 

Within the Disk and Tape Operating Systems 
the assemblers can be used on System/360 
Models 30, 40, 50, 65, and 75, provided 
that main storage and input/output require¬ 
ments are satisfied. The assemblers (disk 
and tape) will both accept the same source 
language input and produce identical object 
output. 

^A 2400-series Magnetic Tape Unit may be sub¬ 
stituted for this device. (It may be 7-track 
or 9-track. If 7-track is used the data con¬ 
version feature is required and the tape must 

I be set converter on, translator off, odd 
parity.) The 1052 Printer-Keyboard must be 
operable if device assignment is tape. 
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The System/360 Disk and Tape Operating 
Systems Assembler assembles source programs 
written in the System/360 Basic Programming 
Support Basic Assembler Language, the Basic 
Programming Support Assembler (8K Tape) 
Language, the IBM 7090/7094 Support Package 
for IBM System/360 Assembler Language, and 
the Basic Operating System/360 Assembler 
(8K Disk) Language, with the following 
exceptions: 

1. The XFR assembler instruction, which is 
considered an invalid mnemonic opera¬ 
tion code in DOS/TOS Operating Systems 
is not allowed. 

2. Additional cards may be required in 
Macro definitions (if used by the 
source program) to satisfy DOS/TOS 
Operating Systems macro requirements. 

3. System macro instructions are changed, 
where necessary, to conform with the 
proper DOS/TOS requirements. 

4. An MNOTE assembler instruction whose 
operand entry consists solely of a 
message enclosed in apostrophes is 
given a severity code of one. 

5. AIF operand.entries must not contain 
explicit binary zeros or ones. 

The DOS/TOS Operating Systems assembler 
language is a subset of the Operating 
System assembler language. Source programs 
written in DOS/TOS assembler language will 
be acceptable to the Operating System 
assemblers provided that system macro 
instructions are changed, where necessary, 
to conform with the proper Operating System 
requirements. 


Note : The assignment, size, and order¬ 

ing of literal pools may differ among the 
assemblers. 

Differences in conditional assembly 
instructions for System/360 assemblers are 
described in Section 10 of this publica¬ 
tion. 


THE ASSEMBLER LANGUAGE 


The basis of the assembler language is a 
collection of mnemonic symbols which rep¬ 
resent : 

1. System/360 machine-language operation 
codes. 

2. Operations (auxiliary functions) to be 
performed by the assembler program. 


The language is augmented by other sym¬ 
bols, supplied by the programmer, and used 
to represent storage addresses or data. 
Symbols are easier to remember and code 
than their machine-language equivalents. 
Use of symbols greatly reduces programming 
effort and error. 


Machine Operation Codes 


The assembler language provides mnemonic 
machine-instruction operation codes for all 
machine instructions in the IBM System/360 
Universal Instruction Set, and extended 
mnemonic operation codes for the condi¬ 
tional branch instruction. 

Assembler Operation Codes 


The assembler language also contains 
mnemonic assembler-instruction operation 
codes, used to specify auxiliary functions 
to be performed by the assembler program. 
These are instructions to the assembler 
program itself and, with a few exceptions, 
do not result in the generation of any 
machine-language code by the assembler 
program. Certain assembler instructions, 
i.e., conditional assembly instructions, 
affect the order of source statement assem¬ 
bly and macro generation or the content of 
generated instructions. 


Macro-Instructions 


The assembler language enables the program¬ 
mer to define and use macro instructions. 
Macro instructions are represented by an 
operation code which, in turn, actually 
stands for a sequence of machine and/or 
assembler instructions that accomplish the 
desired function. 

Macro-instructions used in preparing an 
assembler language source program fall into 
two categories: system macro-instructions, 
provided by IBM, which relate the object 
program to components of the Basic Operat¬ 
ing System, and macro-instructions created 
by the programmer specifically for use in 
the program at hand, or for incorporation 
in a library, available for future use. 

Programmer-created macro-instructions 
are used to simplify the writing of a pro¬ 
gram and/or to ensure that a standard 
sequence of instructions is used to accom¬ 
plish a desired function. 

For instance, the logic of a program may 
require the same instruction sequence bo be 
executed again and again. Rather than code 
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this entire sequence each time it is need¬ 
ed, the programmer creates a macro- 
instruction to represent the sequence, and 
then each time the sequence is needed, the 
programmer simply codes the macro¬ 
instruction statement. During assembly, 
the sequence of instructions represented by 
the macro-instruction is inserted in the 
object program. 

Part 3 of this publication discusses the 
conditional assembly and macro facilities. 


THE ASSEMBLER PROGRAM 


The assembler program, also referred to as 
the "assembler," processes source 
statements written in the assembler lan¬ 
guage. The assembler is separated into an 
assembly Section and a conditional assembly 
and macro generation section. 


The Macro Generation and Conditional 
Assembly Section 


Before source statements can be translated 
into actual machine language, macro¬ 
instructions and conditional assembly 
statements within the source program must 
be processed. The source program is read. 
Any programmer macro-definitions which 
appear before the main portion of the pro¬ 
gram are stored for use when the macro is 
referenced. (System macro-definitions are 
retrieved from the source statement library 
and handled in the same way.) 

The main portion of the program is then 
processed, whenever macro generation or 
conditional assembly is required, the gen¬ 
erated or conditionally assembled text is 
inserted in the original source program. 

The resultant augmented source program is 
ready for input to the assembly section. 


The Assembly Section 


processing a source program involves the 
translation of source statements into 
machine language, the assignment of storage 
locations to instructions and other ele¬ 
ments of the program, and the performance 
of the auxiliary assembler program func¬ 
tions designated by the programmer. The 
output of the assembler program is the 
object program , a machine-language equival¬ 
ent of the source program. The assembler 
program furnishes a printed listing of the 
source statements and object program state¬ 


ments and additional information useful to 
the programmer in analyzing his program, 
such as error indications. The object 
program is in the format required by the 

linkage editor component of DOS/TOS. 

The amount of main and secondary storage 
allocated to the assembler program for use 
during processing determines the maximum 
number of certain language elements that 
may be present in the source program. For 
a discussion of these dependencies, see 
Appendix H . 


PROGRAMMER AIDS 


The assembler program provides auxiliary 
functions that assist the programmer in 
checking and documenting programs, in con¬ 
trolling address assignment, in segmenting 
a program, in data and symbol definition, 
in generating macro-instructions, and in 
controlling the assembly program itself. 
Mnemonic codes, specifying these functions, 
are provided in the language. 

Variety in Data Representation: Decimal, 
binary, hexadecimal, or character represen¬ 
tation of machine-language binary values 
may be employed by the programmer in writ¬ 
ing source statements. Hie programmer 
selects the representation best suited to 
his purpose. 

Base Register Address Calculations As 
discussed in the IBM System/360 Principles 
of Operation manual, the System/360 
addressing scheme requires the designation 
of a base register (containing a base 
address value) and a displacement value in 
specifying a storage location. The assem¬ 
bler assumes the clerical burden of calcu¬ 
lating storage addresses in these terras for 
the symbolic addresses used by the program¬ 
mer. The programmer retains control of 
base register usage and the values entered 
therein. 

Relocatabilitys The object programs pro¬ 
duced by the assembler are in a format 
enabling relocation from the originally 
assigned storage area to any other suitable 
area. 

Sectioning and Linking: The assembler 
language and program provide facilities for 
partitioning an assembly into one or more 
parts called control sections , control 
sections may be added or deleted when load¬ 
ing the object program. Because control 
sections do not have to be loaded contigu¬ 
ously in storage, a sectioned program may 
be loaded and executed even though a con¬ 
tinuous block of storage large enough to 
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accommodate the entire program may not be 
available. 

The linking facilities of the assembler 
language and program allow symbols to be 
defined in one assembly and referred to in 
another, thus effecting a link between 
separately assembled programs. This per¬ 
mits reference to data and/or transfer of 
control between programs. A discussion of 
sectioning and linking is in Section 3 
under Program Sectioning and Linking . 

Program Listings; A listing of the source 
program statements and the resulting object 
program statements may be produced by the 
assembler for each source program it assem¬ 
bles. The programmer can partly control 
the form and content of the listing. 

Error Indications: As a source program is 
assembled, it is analyzed for actual or 
potential errors in the use of the assem¬ 


bler language. Detected errors are indi¬ 
cated in the program listing. 


ASSEMBLER - DOS/TOS RELATIONSHIPS 


The assembler program is a component of IBM 
disk and tape operating systems and func¬ 
tions under their control. DOS/TOS provides 
the assembler with input/output, library, 
and other services needed in assembling a 
source program. In a like manner, the 
object program produced by the assembler 
will normally operate under control of DOS/ 
TOS and depend on it for input/output and 
other services. In writing the source pro¬ 
gram, the programmer must include statements 
requesting the desired functions from DOS/ 
TOS. (See the Supervisor and Input/Output 
Macros publications listed in the Preface .) 
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SECTION 2: GENERAL INFORMATION 


This section presents information about 
assembler language coding conventions, 
assembler source statement structure, 
addressing, and the sectioning and linking 
of programs. 


ASSEMBLER LANGUAGE CODING CONVENTIONS 


This subsection discusses the general cod¬ 
ing conventions associated with use of the 
assembler language- 


Coding Form 


A source program is a sequence of source 
statements that are punched into cards. 
These statements may be written on the 
standard coding form, X28-6509 (Figure 
2-1), provided by IBM. One line of coding 
on the form is punched into one card- The 
vertical columns on the form correspond to 
card columns- 

Space is provided on the form for pro¬ 
gram identification and instructions to 
keypunch operators- None of this informa¬ 
tion is punched into a card. 

The body of the form (Figure 2-1) is 
composed of two fields: the statement 
field, columns 1-71, and the 
identification-sequence field, columns 
73-80- The identification-sequence field 
is not part of a statement and is discussed 
following the subsection Statement Format . 

The entries (i.e., coding) composing a 
statement occupy columns 1-71 of a 


statement line and, if needed, columns 
16-71 of successive continuation lines. 


Continuation Lines 


When it is necessary to continue a state¬ 
ment on another line the following rules 
apply. 

1. Enter any nonblank character in the 
continuation column (end column plus 
one) of the statement line. 

2. Continue the statement on the next line, 

starting in the continue column. 
Columns to the left of the continue 
column must be blank. 

Only one continuation line is allowed 
except for source macro-instructions and 
macro prototype statements, which may have 
more than one continuation line (see Part 
3). 


Statement Boundaries 


Source statements are normally contained in 
columns 1-71 of statement lines and columns 
16-71 of any continuation lines. There¬ 
fore, columns 1, 71, and 16 are referred to 
as the "begin," "end," and "continue" 
columns, respectively. This convention may 
be altered by use of the Input Format Con¬ 
trol (ICTL) assembler instruction discussed 
later in this publication. 
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Figure 2-1. Coding Form 
12 


























Statement Format 


There are two types of 

statements—instructions and comments- 

Instructions may consist of one to four 
entries in the statement field- They are, 
from left to right: a name entry, an 
operation entry, an operand entry, and a 
comments entry- These entries must be 
separated by one or more blanks, and must 
be written in the order stated- Total 
statement size is limited to 187 charac¬ 
ters. If this limit is exceeded, the 
assembly listing may be incorrect for that 
statement. 

The coding form (Figure 2-1) is ruled to 
provide an eight-character name field, a 
five-character operation field, and a 
56-character operand and/or comments field. 

If desired, the programmer may disregard 
these boundaries and write the name, 
operation, operand, and comment entries in 
other positions, subject to the following 
rules: 

1. The entries must not extend beyond 
statement boundaries (either the con¬ 
ventional boundaries, or as designated 
by the programmer via the ICTL 
instruction)- 

2. The entries must be in proper sequence, 
as stated above. 

3. The entries must be separated by one or 
more blanks. 

4. If used* a name entry must be written 
starting in the begin column. 

5. The name and operation entries must be 
completed in the first line of the 
statement, including at least one blank 
following the operation entry. 

A description of the name, operation, 
operand, and comments entries follows: 

Name Entries: The name entry is a symbol, 
eight characters or fewer, created by the 
programmer to identify a statement. A name 
entry is usually optional, but, if present, 
must be entered with the first (or only) 
character appearing in the begin column. 

If the begin column is blank* the assembler 
program assumes no name has been entered. 
Blanks must not appear within a name entry, 
whether the symbol was introduced directly 
by the programmer or indirectly by condi¬ 
tional assembly or macro generation. 

Operation Entries: The operation entry is 
the mnemonic operation code specifying the 
desired machine operation, macro, or assem¬ 


bler function. An operation entry is man¬ 
datory and must appear in the first state¬ 
ment line, starting at least one position 
to the right of the begin column. Valid 
mnemonic operation codes for machine and 
assembler operations are contained in 
Appendices D and E of this publication. 
Valid operation codes consist of five char¬ 
acters or fewer for machine or assembler 
operation codes, and eight characters or 
fewer for macro-instruction operation 
codes. No blanks may appear within the 
operation entry. 

Operand Entries: Operand entries are the 
coding that identifies and describes data 
to be acted upon by the instruction, by 
indicating such things as storage loca¬ 
tions, masks, storage-area lengths, or 
types of data. 

Depending on the needs of the instruc¬ 
tion, one or more operands may be written. 
Operands are required for all machine 
instructions. 

Operands must be separated by commas. 
Blanks must not intervene between operands 
and the commas that separate them. 

The operands may not contain embedded 
blanks except as follows: 

If character representation is 
used to specify a constant, a 
literal, or immediate data in an 
operand, the character string may 
contain blanks, e.g., C'AB D*. 

Comments Entries: Comments are descriptive 
items of information about the program that 
are to be inserted in the program listing. 
All 256 valid characters, including blanks, 
may be used in writing a comment- The 
entry cannot extend beyond the end column 
(normally column 71), and a blank must 
separate it from the operand. 

In instructions where an operand entry 
is not present but a comments entry is 
desired, the absence of the operand entry 
must be indicated by a comma preceded and 
followed by one or more blanks, as follows: 


|Name (Operation | Operand 1 


1 |CSECT 

1 1 - 

1 9 

1 

1 

COMMENT 

-1 

I 1 

I I - 

j I END 

1 

1 

1 t 
— 

COMMENT 



Instruction Example: The following example 
illustrates the use of name, operation, 
operand, and comments entries. A compare 
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instruction has been named by the symbol 
COMP; the operation entry (CR) is the mne¬ 
monic operation code for a register-to- 
register compare operation, and the two 
operands (5,6) designate the two general 
registers whose contents are to be 
compared. The comments entry reminds the 
programmer that he is comparing "new sum" 
to "old" with this instruction. 


j Name j opera tion 
j.-f- 

j COMP j CR 


j Operand j 

-+- 1 

|5,6 NEW SUM TO OLD j 


Summary of Instruction Format 


appear at any point. Extensive notes, or 
comments, may be written by using a series 
of comments statements. 

There are two types of comments state¬ 
ments. One type, written with an asterisk 
(*) in the begin column, is used for com¬ 
ments on the source program. The other 
type, written with a period in the begin 
column and followed by am asterisk, is used 
for comments on a macro-definition. This 
type is further described in Section 7 . 

An example of the comments statement is: 


| Name | Operation j Operand J | 

K- A --+— 1 

j +THIS COMMENT IS CONTINUED ON j X j 

j ANOTHER LINE. j | 


The entries in an instruction must always 
be separated by at least one blank and must 
be in the following order: name, operation, 
operand(s), comment. 

Every statement requires an operation 
entry. Name and comment entries are 
optional. Operand entries are required for 
all machine instructions and most assembler 
instructions- 

The name and operation entries must be 
completed in the first statement line, 
including at least one blank following the 
operation entry. 

The name and operation entries must not 
contain blanks. Operand entries must not 
have blanks preceding or following the 
commas that separate them. 

A name entry must always start in the 
"begin" column. 

If the column after the end column is 
blank, the next line must start a new 
statement. If the column after the end 
column is not blank, the following line 
will be treated as a continuation line. 

All entries must be contained within the 
designated begin, end, and continue column 
boundaries. 


Comments Statements 


comments statements are used to include a 
programmer's notes on an assembly listing. 
(These notes can be helpful during debug¬ 
ging and maintenance of a program.) Com¬ 
ments statements have no effect in the 
assembled program; they are only printed in 
the assembly listing and, therefore, may 


Identification-Sequence Field 


The identification-sequence field of the 
coding form (columns 73-80) is used to 
enter program identification and/or state¬ 
ment sequence characters. The entry is 
optional. If the field, or a portion of 
it, is used for program identification, the 
identification is punched in the statement 
cards, and reproduced in the printed list¬ 
ing of the source program. 

To aid in keeping source statements in 
order, the programmer may code an ascending 
sequence of characters in this field or a 
portion of it. These characters are 
punched into their respective cards, and, 
during assembly, the programmer may request 
the assembler to verify this sequence by 
use of the Input Sequence Checking (ISEQ) 
assembler instruction. This instruction is 
discussed in Section 5 under Program Con¬ 
trol Instructions. 


Character Set 


Source statements are written using the 
following characters: 

Letters A through Z, and $, #, a 

Digits 0 through 9 

Special 

Characters ♦-,=.*()•/£ blank 

These characters are represented by the 
card punch combinations and internal bit 
configurations listed in Appendix A. In 
addition, any of the 256 punch combinations 
may be designated anywhere that characters 
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may appear between paired apostrophes, in 
comments, and in macro-instruction oper¬ 
ands. 


ASSEMBLER LANGUAGE STRUCTURE 


The basic structure of the language can be 
stated as follows. 

A source statement is composed of: 

• A name entry (usually optional). 

• An operation entry (mandatory). 

• An operand entry (usually required). 

• A comments entry (optional). 

A name entry is: 

• A symbol. 

An operation entry is: 

• A mnemonic operation code representing 
a machine, assembler, or macro instruc¬ 
tion. 

An operand entry is: 

• one or more operands composed of one or 
more expressions, which, in turn, are 
composed of a term or an arithmetic 
combination of terms. In general, an 
operand entry should contain 50 or 
fewer terms (see Appendix H). 

Operands of machine instructions gener¬ 
ally represent such things as storage loca¬ 
tions, general registers, immediate data, 
or constant values, operands of assembler 


instructions provide the information needed 
by the assembler program to perform the 
designated operation. 

Figure 2-2 depicts this structure. 

Terms shown in Figure 2-2 are classed as 
absolute or relocatable. Terms are abso¬ 
lute or relocatable due to the effect of 
program relocation upon them. (Program 
relocation is the loading of the object 
program into storage locations other than 
those originally assigned by the assembler 
program.) A term is absolute if its value 
does not change upon relocation. A term is 
relocatable if its value changes upon relo¬ 
cation. 

The following subsection. Terms and 
Expressions , discusses these items as out¬ 
lined in Figure 2-2. 


TERMS AND EXPRESSIONS 


TERMS 


Every term represents a value. This value 
may be assigned by the assembler program 
(symbols, symbol length attribute, location 
counter reference) or may be inherent in 
the term itself (self-defining term, 
literal). 

An arithmetic combination of terms is 
reduced to a single value by the assembler 
program. 

The following material discusses each 
type of term and the rules for its use. 
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Figure 2-2. Assembler Language Structure—Machine and Assembler Instructions 
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Symbols 


A symbol is a character or combination of 
characters used to represent locations or 
arbitrary values. Symbols, through their 
use in name fields and in operands, provide 
the programmer with an efficient way to 
name and reference a program element. 

There are three types of symbols: 

1. Ordinary symbols. 

2. Variable symbols. 

3. Sequence symbols. 

Ordinary symbols consist of one to eight 
letters and/or numbers, the first of which 
must be a letter. Such symbols are used to 
identify machine locations or arbitrary 
values. In the following sections, the 
occurrence of symbol refers to this type of 
term. Absolute symbols are ordinary sym¬ 
bols whose values do not change upon pro¬ 
gram relocation. Relocatable symbols are 
ordinary symbols whose values change upon 
relocation. 


different values to be assigned to one 
symbol. A complete discussion of variable 
symbols appears in Part 3 . 

Sequence symbols consist of a period (.) 
followed by one to seven letters and/or 
numbers, the first of which must be a let¬ 
ter. Sequence symbols are used to indicate 
the position of statements within the 
source program or macro definition. 

Through their use the programmer can vary 
the sequence in which statements are proc¬ 
essed by the assembler program. (See the 
complete discussion in Part 3 ). 

DEFINING SYMBOLS: The assembler assigns a 
value to each symbol appearing as a name 
entry in a source statement. The values 
assigned to symbols naming storage areas, 
instructions, constants, and control sec¬ 
tions are the addresses of the leftmost 
bytes of the storage fields containing the 
named items. Since the addresses of these 
items may change upon program relocation, 
the symbols naming them are considered 
relocatable terms. 


The following are valid ordinary sym¬ 
bols: 

READER 

A23456 

X4F2 

S00P2 

N 

S4 

8B4 

$A1 

#56 

It is advisable to avoid using symbols 
beginning with IJ; they may conflict with 
IOCS symbols (which begin with IJ). 


It is also advisable to avoid using 
symbols which are identical to a file name 
(name field) in a DTF statement with a 
single character suffix. For example, for 
the file name RECIN, IOCS generates the 
symbols: RECIN1, RECIN2, RECIN3, etc. 


The following ordinary symbols are 
invalid, for the reasons noted: 


256B First character is not 

alphabetic. 

REC0RDAREA2 More than eight characters. 


BCD*34 


Contains a special character 
-an asterisk. 


IN AREA 


Contains a blank. 


Variable symbols must begin with an 
ampersand (6) followed by one to seven 
letters and/or numbers, the first of which 
must be a letter. Variable symbols are 
used within the macro definition to allow 


A symbol used as a name entry in the 
Equate Symbol (EQU) assembler instruction 
is assigned a value designated in the oper¬ 
and entry of the instruction. Since the 
operand entry may represent a relocatable 
value, or an absolute (i.e., nonchanging) 
value, the symbol is considered a relocata¬ 
ble term or an absolute term, depending on 
the value to which it is equated. 

The value of a symbol may not be nega¬ 
tive and may not exceed 2 a4 -l. 

A symbol is said to be defined when it 
appears as the name of a source statement. 
(A special case of symbol definition is 
discussed in Section 3, under "Program 
Sectioning and Linking"). 

Symbol definition also involves the 
assignment of a length attribute to the 
symbol. (The assembler maintains an inter¬ 
nal table - the symbol table - in which the 
values and attributes of symbols are kept. 
When the assembler encounters a symbol in 
an operand, it refers to the table for the 
values associated with the symbol.) The 
length attribute of a symbol is the length, 
in bytes, of the storage field whose 
address is represented by the symbol. For 
example, a symbol naming an instruction 
that occupies four bytes of storage has a 
length attribute of 4. Note that there are 
exceptions to this rule; for example, in 
the case where symbol has been defined by 
an equate to location counter value (EQU *) 
or to a self-defining term, the length 
attribute of the symbol is 1. These and 
other exceptions are noted under the 
instructions involved. The length attri¬ 
bute 
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is never affected by a duplication factor. 


PREVIOUSLY DEFINED SYMBOLS: The assembler 
language requires that symbols appearing in 
the operand entry of some instructions be 
previously defined. This simply means that 
the symbols, before their use in an oper¬ 
and, must have appeared as the name entry 
of a prior statement. For example: 


SYM1 MVC A, B 

SYM2 EQU SYM1 


would be a valid sequence of coding. The 
same two instructions in reverse order 
would be invalid. 

GENERAL RESTRICTIONS ON SYMBOLS: A symbol 
may be defined only once in an assembly. 
While the same symbol may appear as the 
name of two or more statements before macro 
generation and conditional assembly, only 
one such statement should be generated. In 
addition, a symbol may be used in the name 
field more than once as a control section 
name (i.e., defined in the START, CSECT, or 
DSECT assembler statements described in 
Section 3 ) because the coding of a control 
section may be suspended and then resumed 
at any subsequent point. The CSECT or 
DSECT statement that resumes the section 
must be named by the same symbol that ini¬ 
tially named the section; thus, the symbol 
that names the section must be repeated. 
Such usage is not considered to be duplica¬ 
tion of a symbol definition. 


Self-Defining Terms 


A self-defining term is one whose value is 
inherent in the term. It is not assigned a 
value by the assembler program. For exam¬ 
ple, the decimal self-defining term — 15 
— represents a value of fifteen. 

There are four types of self-defining 
terms: decimal, hexadecimal, binary, and 
character. Use of these terms is spoken of 
as decimal, hexadecimal, binary, or charac¬ 
ter representation of the machine language 
binary value or bit configuration they 
represent. 

Self-defining terms are classed as abso¬ 
lute terms because the values they rep¬ 
resent do not change upon program reloca¬ 
tion. 


USING SELF-DEFINING TERMS: Self-defining 
terms are the means of specifying machine 
values or bit configurations without equat¬ 
ing the values to symbols and using the 
symbols. Self-defining terms may be used 
to specify such program elements as immedi¬ 
ate data, masks, registers, addresses, and 
address increments. 

The use of a self-defining term is quite 
distinct from the use of data constants or 
literals. When a self-defining term is 
used in a machine-instruction statement, 
its value is assembled into the instruc¬ 
tion. When a data constant or literal is 
specified in the operand of an instruction, 
its address is assembled into the instruc¬ 
tion. 

Decimal Self-Defining Term: A decimal term 
is simply an unsigned decimal number writ¬ 
ten as a sequence of decimal digits. High- 
order zeros may be used (e.g.,007). 
Limitations on the value of the term depend 
on its use. For example, a decimal term 
that designates a general register must 
have a value between 0 and 15 inclusively; 
one that represents an address must not 
exceed the size of storage. In any case, a 
decimal term may not consist of more than 
eight digits or exceed 16,777,215 (2 2< *-l). 

A decimal term is assembled as its binary 
equivalent. Some examples of decimal self- 
defining terms are: 8, 147, 4092, 00021. 

Hexadecimal Self-defining Term: A 
hexadecimal self-defining term is an 
unsigned hexadecimal number written as a 
sequence of hexadecimal digits. The digits 
must be enclosed in single apostrophes and 
preceded by the letter X: X'C49*. 

Each hexadecimal digit is assembled as 
its four-bit binary equivalent. Thus, a 
hexadecimal term used to represent an 
eight-bit mask would consist of two hexa¬ 
decimal digits. The maximum value of a 
hexadecimal term is X'FFFFFF*. 

The hexadecimal digits and their bit 
patterns are as follows: 


0- 0000 

4- 0100 

8- 1000 

C- 1100 

1- 0001 

5- 0101 

9- 1001 

D- 1101 

2- 0010 

6- 0110 

A- 1010 

E- 1110 

3- 0011 

7- 0111 

B- 1011 

F- 1111 


A table for converting from hexadecimal 
representation to decimal representation is 
provided in Appendix B . 

Binary Self-Defining Term: A binary self- 
defining term is written as an unsigned 
sequence of l*s and 0*s enclosed in 
apostrophes and preceded by the letter B, 
as follows: B*10001101*. This term would 
appear in storage as shown, occupying one 
byte. A binary term may have up to 24 bits 
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represented. Padding with binary zeros is 
on the left. 

Binary representation is used primarily 
in designating bit patterns of masks or in 
logical operations. 

The following example illustrates a 
binary term used as a mask in a Test Under 
Mask (TM) instruction. The contents of 
GAMMA are to be tested, bit by bit, against 
the pattern of bits represented by the 
binary term. 


|Marne {operation {operand { 

[alpha {TM |GAMMA,B*10101101* { 


Character Self-Defining Term: A character 
self-defining term consists of one to three 
characters enclosed by apostrophes. It 
must be preceded by the letter C- All 
letters, decimal digits, and special char¬ 
acters may be used in a character term. In 
addition, any of the remainder of the 256 
punch combinations may be designated in a 
character self-defining term. Examples of 
character self-defining terms are as fol¬ 
lows: 

C*/* C* * (blank) 

C*ABC* C*13 * 

Because of the use of apostrophes in the 
assembler language and ampersands in the 
macro language as syntactic characters, the 
following rule must be observed when using 
these characters in a character term. 

For each apostrophe or ampersand desired 
in a character term, two apostrophes or 
ampersands must be written. For example, 
the character value A'# would be written as 
C' A* * # * , while an apostrophe followed by a 
blank and another apostrophe would be writ¬ 
ten as c* * * * * * • 

Each character in the character sequence 
is assembled as its eight-bit code equiva¬ 
lent (see Appendix A ). The two apostrophes 
or ampersands that must be used to rep¬ 
resent a single apostrophe or ampersand 
within the character sequence are assembled 
as a single apostrophe or ampersand. 


Location Counter Reference 


A Location counter is used to assign 
storage addresses to program statements. 

It is the assembler program's equivalent of 
the instruction counter in the computer. 


As each machine instruction or data area is 
assembled, the Location Counter is first 
adjusted to the proper boundary for the 
item, if adjustment is necessary, and then 
incremented by the length of the assembled 
item. Thus, it always points to the next 
available location. If the statement is 
named by a symbol, the value assigned to the 
symbol is the value of the Location Counter 
after boundary adjustment, but before addi¬ 
tion of the length. 

The assembler maintains a Location 
Counter for each control section of the 
program and manipulates each Location 
Counter as previously described. Source 
statements for each section are assigned 
addresses from the Location Counter for 
that section. The Location Counter for 
each successively declared control section 
assigns locations in consecutively higher 
areas of storage. If a program has multi¬ 
ple control sections, all statements iden¬ 
tified as belonging to the first control 
section will be assigned from the Location 
Counter for section 1, the statements for 
the second control section will be assigned 
from the Location Counter for section 2, 
etc. This procedure is followed whether 
the statements from different control sec¬ 
tions are interspersed or written in con¬ 
trol section sequence- 

The Location counter setting can be 
controlled by using the START and ORG 
assembler instructions, which are described 
in Sections 3 and j>, respectively. The 
counter affected by either of these assem¬ 
bler instructions is the counter for the 
control section in which they appear. The 
maximum value for the Location Counter is 
2**-l. 

The programmer may refer to the current 
value of the Location Counter at any place 
in a program, by using an asterisk in an 
operand. The asterisk represents the loca¬ 
tion of the first byte of currently availa¬ 
ble storage (i.e., after any required 
boundary adjustment). Using an asterisk in 
a machine-instruction statement is the same 
as placing a symbol in the name field of 
the statement and then using that symbol as 
an operand of the statement. Because a 
Location Counter is maintained for each 
control section, a Location Counter ref¬ 
erence designates the Location Counter for 
the section in which the reference appears. 

A reference to the Location Counter may 
be made in a literal address constant 
(i.e., the asterisk may be used in an 
address constant specified in literal 
form). The address of the instruction 
containing the literal is used for the 
value of the Location Counter. A Location 
Counter reference may not be used in a 
statement which requires the use of a 
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predefined symbol, with the exception of 
the EQU and ORG assembler instructions. 


Literals 


A literal term is one of three basic ways 
to introduce data into a program. It is 
simply a constant preceded by an equal sign 
(=). 

A literal represents data rather than a 
reference to data. The appearance of a 
literal in a source statement directs the 
assembler program to assemble the data 
specified by the literal, store this data 
in a "literal pool", and place the value 
(address) of the storage field containing 
the data in the operand field of the assem¬ 
bled statement. 

Literals provide a means of entering 
constants (such as numbers for calculation, 
addresses, indexing factors, or words or 
phrases for printing out a message) into a 
program by specifying the constant in the 
operand of the instruction in which it is 
used. This is in contrast to using the DC 
assembler instruction to enter the data 
into the program, and then using the name 
of the DC instruction in the operand. Only 
one reference to a literal is allowed in a 
machine-instruction statement. 

A literal term may not be combined with 
any other terms. 

A literal may not be used as the receiv¬ 
ing field of an instruction that modifies 
storage. 

A literal may not be specified in an 
address constant (see section 5, DC—Define 
Constant). 

A literal may not have an explicit base 
or an explicit index when specified in an 
instruction. 

The instruction coded below shows one 
use of a literal. 


|Name |operation |Operand | 

[gAMMA |l j10,^F* 274* | 

I-L-L-J 


The statement GAMMA is a load instruc¬ 
tion using a literal as the second operand. 
When assembled, the second operand of the 
instruction will be the address at which 
the binary value represented by F'274* is 
stored. 


In general, literals may be used wherev¬ 
er a storage address is permitted as an 
operand. They may not, however, be used in 
any assembler instruction. Literals are 
considered relocatable, because the address 
of the literal, rather than the literal 
itself, will be assembled in the statement 
that employs a literal. The assembler 
generates the literals, collects them, and 
places them in a specific area of storage, 
as explained in the subsection "The Literal 
Pool." A literal is not to be confused 
with the immediate data in an SI instruc¬ 
tion. Immediate data is assembled into the 
instruction. 


Literal Format: The assembler requires a 
description of the type of literal being 
specified as well as the literal itself. 
This descriptive information assists the 
assembler in assembling the literal cor¬ 
rectly. The descriptive portion of the 
literal must indicate the format in which 
the constant is to be assembled. It may 
also specify the length the constant is to 
occupy. 

The method of describing and specifying 
a constant as a literal is nearly identical 
to the method of specifying it in the oper¬ 
and of a DC assembler instruction. The 
major difference is that the literal must 
start with an equal sign (=), which indi¬ 
cates to the assembler that a literal fol¬ 
lows. See the discussion of the DC assem¬ 
bler instruction operand format ( Section 5 ) 
for the means of specifying a literal. The 
type of literal designated in an instruc¬ 
tion is not checked for correspondence with 
the operation code of the instruction. 

Some examples of literals are: 

=A(BETA> — address constant literal. 
=F*1234* — a fixed-point number with 

a length of four bytes. 

—C * ABC* — a character literal. 

The Literal Pool: The literals processed 
by the assembler are collected and placed 
in a special area called the literal pool, 
and the location of the literal, rather 
than the literal itself, is assembled in 
the statement employing a literal. The 
positioning of the literal pool may be 
controlled by the programmer, if he so 
desires. Unless otherwise specified, the 
literal pool is placed at the end of the 
first control section. 

The programmer may also specify that 
multiple literal pools be created. Howev¬ 
er, the sequence in which literals are 
ordered within the pool is controlled by 
the assembler. Further information on 
positioning the literal pool(s) is in Sec¬ 
tion 5 under LTORG—BEGIN LITERAL POOL. 
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Duplicate Literals: If duplicate literals 
occur within one literal pool, only one 
literal is stored. Literals are considered 
duplicates only if their specifications are 
identical. A literal will be stored, even 
if it appears to duplicate another literal, 
if it is an A-type address constant con¬ 
taining any reference to the Location 
Counter. 

The following examples illustrate the 
foregoing rules: 

X* FO* 

Both are stored 

C* 0 * 

X L3'0 * 

Both are stored 

HL3 * 0' 

A(*+4) 

Both are stored 

A(*-*-4) 

X* FFFF* 

Identical; the first is stored 

X* FFFF* 


S ymbol Length Attribute Reference 

The length attribute of a symbol may be 
used as a term by coding L* followed by the 
symbol, as in: 

L* BETA 

The length attribute of BETA will be 
substituted for the term. The following 
example illustrates the use of L*symbol in 
moving a character constant into either the 
high-order or low-order end of a storage 
field. 

For ease in following the example, the 
length attributes of A1 and B2 are men¬ 
tioned. 


r ~ 

T- 

T- - 

— 1 

j Name 

|Operation 

|Operand 

1 

1-- 

-+- 

- 

-* 

|A1 

|DS 

j CL8 

1 

| B2 

1 DC 

|CL2 * AB* 

1 

j HIORD 

j MVC 

|A1(L* B2),B2 

I 

jLOORD 

| MVC 

jAl+L*A1-L*B2(L*B2) 

# B2| 

L__ 

-X -- 

X— _ — _ 

_J 


A1 names a storage field eight bytes in 
length and is assigned a length attribute 
of eight. B2 names a character constant 
two bytes in length and is assigned a 
length attribute of two. The statement 
named HIORD moves the contents of B2 into 


the leftmost two bytes of Al. The term 
L* B2 in parentheses provides the length 
specification required by the instruction. 
When the instruction is assembled, the 
length is placed in the proper field of the 
machine instruction. 

The statement named LOORD moves the 
contents of B2 into the rightmost two bytes 
of Al. The combination of terms 
Al+L*Al-L*B2 results in the addition of the 
length of Al to the beginning address of 
Al, and the subtraction of the length of B2 
from this value. The result is the address 
of the seventh byte in field Al. The con¬ 
stant represented by B2 is moved into Al 
starting at this address. L*B2 in 
parentheses provides length specification 
as in HIORD. 

Note: The length attribute of * is equal 
to the length of the instruction in which 
it appears, except in an EQU to * instruc¬ 
tion where the length attribute is 1. 


EXPRESSIONS 


Expressions, which are used in coding oper¬ 
and entries for assembler language state¬ 
ments, are composed of either a single term 
or an arithmetic combination of terms (see 
Figure 2-2). Arithmetically combined 
terms, enclosed in parentheses, may be used 
in combination with terms outside the 
parentheses. For example: 

14+BETA-(GAMMA-LAMBDA) 

When terms in parentheses occur in com¬ 
bination with other terms, like 
(GAMMA-LAMBDA) in the example, the paren¬ 
thesized terms are reduced first to a sin¬ 
gle value. This value may be absolute or 
relocatable, depending on the combination 
of terms. This value then is used in 
reducing the rest of the combination to 
another single value. 

Parenthesized terms may be included 
within another set of terms in parentheses. 
For example: 

A+B-(C+D-(E+F)+10) 

This expression has two levels of 
parentheses. A level of parentheses is a 
left parenthesis and its matching right 
parenthesis. One level of parentheses 
surrounds E+F. The next higher level of 
parentheses surrounds C+D-(E+F)+10. The 
innermost set of terms in parentheses (the 
lowest level) is evaluated first. 

The following are examples of valid 
expressions: 
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AREA1+X*2D* 

* +32 
N-25 

FIELD* 332 
FIELD 

(EXIT-ENTRY*1> * GO 


BETA*10 
B'101 * 

C*ABC * 

29 

L’FIELD 
LAMBDA+GAMMA 
TEN/TtfO 


=F*1234 * 

ALPHA-B ET A/ (10 * ARE A* L * FIELD)-10 0 
A*(A*(A*(A*l)*3*(B-3))) 


The rules for coding expressions are: 


is evaluated first and the resulting value 
used in computing the final value of the 
expression. 

Final values of expressions must be 
between -2 a *» and 2 a *-l (inclusive). Inter¬ 
mediate results may have a value between 
-2 31 and 2 33 --1 (inclusive). 


Absolu t e and R elo catable Expressions 


1. An expression may not start with an 
arithmetic operator, that is, ♦-/* 
Therefore, the expression -A+BETA is 
invalid. However, the expression 
0-A+BETA is valid. 


An expression is called absolute if its 
value is unaffected by program relocation. 

An expression is called relocatable if 
its value changes upon program relocation. 


2. An expression may not contain two terms 
or two operators in succession. 

3. An expression may not consist of more 
than 16 terms. 

4. An expression may not have more than 
five levels of parentheses. 

5. A multi-term expression may not contain 
a literal. 


E valuation of Exp r ession s 


A single terra expression, e.g., 29, BETA, 

*, L*SYMBOL, takes on the value of the term 
involved. 

A multi-term expression, e.g., BETA+10, 
ENTRY-EXIT, 25*10*A/B, is reduced to a 
single value, as follows: 

1. Each term is given its value. 

2. Arithmetic operations are performed 
left to right. Multiplication and 
division are done before addition and 
subtraction, e.g., A*B*C is evaluated 
as A+(B*C), not (A*B)*C. The computed 
result is the value of the expression. 

3. Every expression is computed to 32 
bits. 

4. Division always yields an integer 
result; any fractional portion of the 
result is dropped. B.g. # 1/2*10 yields 
a zero result, whereas 10*1/2 yields 5. 

5. Division by zero is valid and yields a 
zero result. 

Parenthesized expressions used in an 
expression are processed before the rest of 
the terms in the expression, e.g., in the 
expression A*BETA* (CON-10) , the terra CON-10 


The two types of expressions, absolute 
and relocatable, take on these charac¬ 
teristics from the term or terms composing 
them. The following material discusses 
this relationship. 

Abso lu te Ex pr ession: An absolute expres¬ 
sion may be an absolute term or any arith¬ 
metic combination of absolute terms. An 
absolute term may be an absolute symbol, 
any of the self-defining terms, or the 
length attribute reference. As indicated 
in Figure 2-2, all arithmetic operations 
are permitted between absolute terms. 

An absolute expression may contain relo¬ 
catable terms (RT) — alone or in combina¬ 
tion with absolute terms (AT) — under the 
following conditions: 

1. There must be an even number of reloca¬ 
table terms in the expression. 

2. The relocatable terms must be paired. 
Each pair of terms must have the same 
relocatability attribute, i.e., they 
appear in the same control section in 
this assembly (see "Program Sectioning 
and Linking," Section 3). Each pair 
must consist of terms with opposite 
signs. The paired terms do not have to 
be contiguous, e.g., RT+AT-RT. 

3. No relocatable expression may enter 
into a multiply or divide operation. 
Thus, RT-RT*10 is invalid. However, 
(RT—RT)*10 is valid. 

The pairing of relocatable terms (with 
opposite signs and the same relocatability 
attribute) cancels the effect of reloca¬ 
tion. Therefore the value represented by 
the paired terms remains constant, regard¬ 
less of program relocation. For example, 
in the absolute expression A-Y*X, A is an 
absolute terra, and X and Y are relocatable 
terms with the same relocatability attri¬ 
bute. If A equals 50, Y equals 25, and X 
equals 10, the value of the expression 
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would be 35. If X and Y are relocated by a 
factor of 100 their values would then be 
125 and 110. However, the expression would 
still evaluate as 35 (50-125*110=35). 

An absolute express!jn reduces to a 
single absolute value. 

The following examples illustrate abso¬ 
lute expressions. A is an absolute term; X 
and Y are relocatable terms with the same 
relocatability attribute. 

A-Y+X 

A 

A*A 

X-Y*A 

*—Y (a reference to the Location Counter 
must be paired with another relocata¬ 
ble term from the same control sec¬ 
tion, i.e., with the same relocatabil¬ 
ity attribute) 

Relocatable Expressions; A relocatable 
expression is one whose value would change 
by n if the program in which it appears is 
relocated n bytes away from its originally 
assigned area of storage. 

A relocatable expression may be a relo¬ 
catable term. A relocatable expression may 
contain relocatable terms — alone or in 
combination with absolute terms — under 
the following conditions: 

1. There must be an odd number of reloca¬ 
table terms. 

2. All the relocatable terms but one must 
be paired. Pairing is described in 
Absolute Expression . 


3. The unpaired term must not be directly 
preceded by a minus sign. 


4. No relocatable term may enter into a 
multiply or divide operation. 


A relocatable expression reduces to a 
single relocatable value. This value is 
the value of the odd relocatable term, 
adjusted by the values represented by the 
absolute terms and/or paired relocatable 
terms associated with it. 

For example, in the expression w-x+w-10, 
w and X are relocatable terms with the same 
relocatability attribute. If initially W 
equals 10 and X equals 5, the value of the 
expression is 5. However, upon relocation 
this value will change. If a relocation 
factor of 100 is applied, the value of the 
expression is 105. Note that the value of 
the paired terms, W-X, remains constant at 
5 regardless of relocation. Thus, the new 
value of the expression, 105, is the result 
of the value of the odd term (W) adjusted 
by the values of W-X and 10. 

The following examples illustrate relo¬ 
catable expressions. A is an absolute 
term, W and X are relocatable terms with 
the same relocatability attribute, Y is a 
relocatable term with a different relocat¬ 
ability attribute. 

Y-32*A W-X** =F*1234*(literal) 

W-X+Y A*A+W-W+Y 

* (reference to W-x+W 

Location Counter) Y 
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PART 2 


BASIC FUNCTIONS OF THE ASSEMBLER LANGUAGE 


SECTION 3i ADDRESSING — PROGRAM 
SECTIONING AND LINKING 


ADDRESSING 


The System/360 addressing technique 
requires the use of a base register, which 
contains the base address, and a displace¬ 
ment, which is added to the contents of the 
base register. The programmer may specify 
a symbolic address and request the assem¬ 
bler to determine its storage address in 
terms of a base register and a displace¬ 
ment. The programmer may rely on the 
assembler to perform this service for him 
by indicating which general registers are 
available for assignment and what values 
the assembler may assume each contains. 

The programmer may use as many or as few 
registers for this purpose as he desires. 
The only requirements are that, at the 
point of reference, a register containing 
an address from the same control section is 
available, and that this address is less 
than or equal to the address of the item to 
which the reference is being made. The 
difference between the two addresses may 
not exceed 4095 bytes. 


ADDRESSES — EXPLICIT AND IMPLIED 


An address is composed of a displacement 
plus the contents of a base register. <In 
the case of RX instructions, the contents 
of an index register are also used to der¬ 
ive the address.) 


The programmer writes an explicit 
address by specifying the displacement and 
the base register number. In designating 
explicit addresses a base register may not 
be combined with a relocatable symbol. 


He writes an implied address by speci¬ 
fying an absolute or relocatable address. 
The assembler has the facility to select a 
base register and compute a displacement, 
thereby generating an explicit address from 
an implied address, provided that it has 
been informed (1) what base registers are 
available to it and (2) what each contains. 
The programmer conveys this information to 


the assembler through the USING and DROP 
assembler instructions. 


BASE REGISTER INSTRUCTIONS 


The USING and DROP assembler instructions 
enable programmers to use expressions rep¬ 
resenting implied addresses as operands of 
machine-instruction statements, leaving the 
assignment of base registers and the calcu¬ 
lation of displacements to the assembler. 

In order to use symbols in the operand 
field of machine-instruction statements, 
the programmer must (1) indicate to the 
assembler, by means of a USING statement, 
that one or more general registers are 
available for use as base registers, (2) 
specify, by means of the USING statement, 
what value each base register contains, and 
(3) load each base register with the value 
he has specified for it. 

Having the assembler determine base 
registers and displacements relieves the 
programmer of separating each address into 
a displacement value and a base address 
value. This feature of the assembler will 
eliminate a likely source of programming 
errors, thus reducing the time required to 
check out programs. To take advantage of 
this feature, the programmer uses the USING 
and DROP instructions described in this 
subsection. The principal discussion of 
this feature follows the description of 
both instructions. 


USING — Use Base Address Register 


The USING instruction indicates that one or 
more general registers are available for 
use as base registers. This instruction 
also states the base address values that 
the assembler may assume will be in the 
registers at object time. Note that a 
USING instruction does not load the reg¬ 
isters specified. It is the programmer’s 
responsibility to see that the specified 
base address values are placed into the 
registers. Suggested loading methods are 
described in the subsection Programming 
with the USING Instruction . The typical 
form of the USING instruction statement isi 
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Form C24-3414-2, -3, -4 
Page Revised 4/26/67 
By TNL N26-0536 


JName |Operation JOperand | 

I-j.-f---1 

jNot |USING |From 2-17 expressions! 

|used j |of the form v,rl, j 

Jr2,r3,...,rl6 J 


Operand v must be an absolute or reloca¬ 
table expression with a value ranging from 
-2 aM to *2 a *-l. No literals are permitted. 
Operand v specifies a value that the assem¬ 
bler can use as a base address. The other 
operands must be absolute expressions. The 
operand rl specifies the general register 
that can be assumed to contain the base 
address represented by operand v. Operands 
r2, r3, r4, . . . specify registers that 

can be assumed to contain v+4096, v*8192, 
v+12288, . . ., respectively. The values 

of the operands rl # r2, r3, rl6 must 

be between 0 and 15. For example, the 
statement: 


2. register 0 must, be specified as operand 
rl. 

The assembler assumes that register 0 
contains zero. Therefore, regardless of the 
value of operand v, it calculates dis¬ 
placements as if operand v were absolute 
or relocatable zero. The assembler also 
assumes that subsequent registers specified 
in the same USING statement contain 4096, 
8192, etc. 

NOTE: If register 0 is used as a base 

register, the program is not relocatable, 
despite the fact that operand v may be 
relocatable. The program can be made re¬ 
locatable by: 

1. Replacing register 0 in the USING 
statement. 

| 2. Loading the new register with a re- 
■ locatable value. 

3. Reassembling the program. 


i- 

{Name 
1- 


j Operation 

+ 


USING 


|Operand 
1* #12,13 


i-j.-x- 



tells the assembler it may assume that the 
current value of the Location Counter will 
be in general register 12 at object time, 
and that the current value of the Location 
Counter, incremented by 4096, will be in 
general register 13 at object time. 

If the programmer changes the value in a 
base register currently being used, and 
wishes the assembler to compute displace¬ 
ment from this value, the assembler must be 
told the new value by means of another 
USING statement. In the following sequence 
the assembler first assumes that the value 
of ALPHA is in register 9. The second 
statement then causes the assembler to 
assume that ALPHA*1000 is the value in 
register 9. 

|Name |Operation |Operand | 

1 |USING |ALPHA,9 | 

I I- I I 

I I- I | 

| |USING |ALPHA*1000,9 ) 

If the programmer has to refer to the 
first 4096 bytes of storage, he can use 
general register 0 as a base register sub¬ 
ject to the following conditions: 

1. The value of operand v must be either 
absolute or relocatable zero or simply 
relocatable, and 


DROP — Drop Ease Register 


The DROP instruction specifies a. previously 
available register that may no longer be 
used as a base register. The typical form 
of the DROP instruction statement is as 
follows: 


1—- 

)Name 

|Operation 

|Operand 

jNot 

t 

|drop 

jUp to 16 absolute 

| used 

1 

(expressions of the 

I 

1 

|form rl,r2. 


1 

| r 3 , . . . , rl6 


I 

A 


j 


The expressions indicate general reg¬ 
isters previously specified in a USING 
statement that are now unavailable for base 
addressing. The following statement, for 
example, prevents the assembler from using 
registers 7 and 11: 


i- 

|Name 

T 

| Operation 

. i . _ . 

|Operand 

- -1 

1 

...1 

r 

| 

I 

j DROP 

l 

1- 

1 '■J 
l - 
1 H 

1 (- 

1 1 

1 1 

1 

1 

_ J 


It is not necessary to use a DROP state¬ 
ment when the base address in a register is 
changed by a USING statement; nor are DROP 
statements needed at the end of the source 
program. 
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A register made unavailable by a DROP 
instruction can be made available again by 
a subsequent USING instruction. 


PROGRAMMING WITH THE USING INSTRUCTION 


The USING (and DROP) instructions may be 
used anywhere in a program, as often as 
needed, to indicate the general registers 
that are available for use as base reg¬ 
isters and the base address values the 
assembler may assume each contains at ex¬ 
ecution time. Whenever an address is spec¬ 
ified in a machine-instruction statement, 
the assembler determines whether there is 
an available register containing a suitable 
base address. A register is considered 
available for a relocatable address if it 
was assigned a relocatable value that is in 
the same control section as the address. A 
register assigned an absolute value is 
available for addressing absolute locations 
only. In either case, the base address is 
considered suitable only if it is less than 
or equal to the address of the item to 
which the reference is made. The differ¬ 
ence between the two addresses may not 
exceed 4095 bytes. In calculating the base 
register to be used, the assembler always 
uses the available register giving the 
smallest displacement. If there are two 
registers with the same value, the highest 
numbered register is used. 


| Name 

~r - 

|Operation 

| BALR 
|USING 

|Operand 

12,0 

1 * # 2 

--1 

| BEGIN 

FIRST 

1 - 
1 - 

1 

1 


LAST 

! - 
1 - 

1 

1 


_ 

jEND 

|BEGIN 

- J 


In the preceding sequence, the BALR 
instruction loads register 2 with the 
address of the first storage location 
immediately following. In this case, it is 
the address of the instruction named FIRST. 
The USING instruction indicates to the 
assembler that register 2 contains this 
location. When employing this method, the 
USING instruction must immediately follow 
the BALR instruction. No other USING or 
load instructions are required if the loca¬ 
tion named LAST is within 4095 bytes of 
FIRST. 


In Figure 3-1, the BALR and LM instruc¬ 
tions load registers 2-5. The USING 
instruction indicates to the assembler that 
these registers are available as base reg¬ 
isters for addressing a maximum of 16,384 
consecutive bytes of storage, beginning 
with the location named HERE. The number 
of addressable bytes may be increased or 
decreased by altering the number of reg¬ 
isters designated by the USING and LM 
instructions and the number of address 
constants specified in the DC instruction. 


RELATIVE ADDRESSING 


Relative addressing is the technique of 
addressing instructions and data areas by 
designating their location in relation to 
the Location Counter or to some symbolic 
location. This type of addressing is 
always in bytes, never in bits, words, or 
instructions. Thus, the expression **4 
specifies an address that is four bytes 
greater than the current value of the Loca¬ 
tion Counter. In the sequence of instruc¬ 
tions shown in the following example, the 
location of the CR machine instruction can 
be expressed in two ways, ALPHA*2 or 
BETA-4, because all of the mnemonics in the 
example are for 2-byte instructions in the 
RR format. 


|Name |Operation |Operand 

|BEGIN |BALR |2,0 

j jUSING |HERE,2,3,4,5 

|HERE |LM j 3,5,BASEADDR 

| |B j FIRST 

j BASEADDR |DC jA(HERE+4096,HERE+8192,HERE+12288) 

|FIRST |. j 

i I- I 

I I * i 

j LAST j. j 

I j END |BEGIN 

Figure 3-1. Multiple Base Register Assignment 
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jName jOperation 

,-+- 

j ALPHA |LR 

I ICR 

j j BCR 

|BETA JAR 


T- 1 

|Operand | 

+- 1 

J3,4 | 

14,6 | 

U.14 I 

12,3 | 


PROGRAM SECTIONING AND LINKING 


It is often convenient, or necessary, to 
write a large program in sections. The 
sections may be assembled separately, then 
combined subsequently into one object pro¬ 
gram. The assembler provides facilities 
for creating multisectioned programs and 
symbolically linking separately assembled 
programs or program sections. The combined 
number of control sections and dummy sec¬ 
tions plus the number of unique symbols in 
EXTRN statements and V-type address con¬ 
stants may not exceed 255. (EXTRN state¬ 
ments are discussed in this section; V-type 
constants in Section 5 under the DC — 
Define Constant assembler instruction.) If 
the same symbol appears in a V-type address 
constant and in the name field of a CSECT 
or DSECT statement, it is counted as two 
symbols. 


Sectioning a program is optional, and 
nany programs can best be written without 
sectioning them. The programmer writing an 
unsectioned program need not concern him¬ 
self with the subsequent discussion of 
program sections, which are called control 
sections. He need not employ the CSECT 
instruction, which is used to identify the 
control sections of a multisection program. 
Similarly, he need not concern himself with 
the discussion of symbolic linkages if his 
program neither requires a linkage to nor 
receives a linkage from another program. 

He may, however, wish to identify the pro¬ 
gram and/or specify a tentative starting 
location for it, both of which may be done 
by using the START instruction. He may 
also want to employ the dummy section fea¬ 
ture obtained by using the DSECT instruc¬ 
tion. 


Note: Program sectioning and linking is 
closely related to the specification of 
base registers for each control section. 
Sectioning and linking example® are provid¬ 
ed under the heading Addressing External 
Control Sections. 


CONTROL SECTIONS 


The concept of program sectioning is a 
consideration at coding time, assembly 
time, and load time. To the programmer, a 
program is a logical unit. He may want to 
divide it into sections called control 
sections; if so, he writes it in such a way 
that control passes properly from one sec¬ 
tion to another regardless of the relative 
physical position of the sections in stor¬ 
age. A control section is a block of cod¬ 
ing that can be relocated, independently of 
other coding, at load time without altering 
or impairing the operating logic of the 
program. It is normally identified by the 
CSECT instruction. However, if it is 
desired to specify a tentative starting 
location, the START instruction may be used 
to identify the first control section. 


To the assembler, there is no such thing 
as a program; instead, there is an assem¬ 
bly, which consists of one or more control 
sections. (However, the terms assembly and 
program are often used interchangeably.) 

An unsectioned program is treated as a 
single control section. To the linkage 
editor, there are no programs, only control 
sections that must be fashioned into an 
object program. 


The output of the assembler consists of 
the assembled control sections and a con¬ 
trol dictionary. The control dictionary 
contains information the linkage editor 
needs in order to complete cross- 
referencing between control sections, as it 
combines them into an object program. The 
linkage editor can take control sections 
from various assemblies and combine them 
properly with the help of the corresponding 
control dictionaries. Successful 
combination of separately assembled control 
sections depends on the techniques used to 
provide symbolic linkages between the con¬ 
trol sections. 


Whether the programmer writes an unsec¬ 
tioned program, a multisection program, or 
part of a multisection program, he still 
knows what eventually will be entered into 
storage, because he has described storage 
symbolically. He may not know where each 
section appears in storage, but he does 
know what storage contains. There is no 
constant relationship between control sec¬ 
tions. Thus, knowing the location of one 
control section does not make another con¬ 
trol section addressable by relative 
addressing techniques. 
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Control Section Location Assignment 


Control section contents can be intermixed 
because the assembler provides a Location 
Counter for each control section. Control 
sections are assigned starting locations 
consecutively, in the same order as the 
control sections first occur in the pro¬ 
gram. Each control section subsequent to 
the first begins at the next available 
double-word boundary. 


FIRST CONTROL SECTION 


The first control section of a program has 
the following special properties. 

1. The initial value of its location coun¬ 
ter may be specified as an absolute 
value. 

2. It normally contains the literals 
requested in the program, although 
their positioning can be altered. This 
is further explained under the discus¬ 
sion of the LTORG assembler instruc¬ 
tion. 


START — Start Assembly 


The START instruction may be used to give a 
name to the first (or only) control section 
of a program. It may also be used to spec¬ 
ify the initial value of the location coun¬ 
ter for the first control section of the 
program. The typical form of the START 
instruction statement is as follows: 


| Name | operation J operand j 

|A symbol |START JA self-defining j 

j or not I I term or not j 

|used j |used f 


If a symbol names the START instruction, 
the symbol is established as the name of 
the control section. If not, the control 
section is considered to be unnamed. All 
subsequent statements are assembled as part 
of that control section. This continues 
until a CSECT instruction identifying a 
different control section or a DSECT 
instruction is encountered. A CSECT 
instruction named by the same symbol that 
names a START instruction is considered to 
identify the continuation of the control 
section first identified by the START. 
Similarly, an unnamed CSECT that occurs in 


a program initiated by an unnamed START is 
considered to identify the continuation of 
the unnamed control section. 

The symbol in the name field is a valid 
relocatable symbol whose value represents 
the address of the first byte of the con¬ 
trol section. It has a length attribute of 
one. 

The assembler uses the self-defining 
term specified by the operand as the ini¬ 
tial value of the location counter of the 
program. This value should be divisible by 
eight. For example, either of the follow¬ 
ing statements: 


{Name [Operation |Operand | 

[pR0G2 [START jloUO 

j PR0G2 [START |X'7F8* J 

I-X-X-J 

could be used to assign the name PR0G2 to 
the first control section and to indicate 
an initial assembly location of 2040. If 
the operand is omitted, the assembler sets 
the initial value of the location counter 
to zero. The location counter is set at 
the next doubleword boundary when the value 
of the START operand is not divisible by 8. 

Note : The START instruction may not be 

preceded by any type of assembler language 
statement that may either affect or depend 
upon the setting of the Location Counter. 


CSECT — Identify Control Section 


The CSECT instruction identifies the begin 
ning or the continuation of a control sec¬ 
tion. The typical form of the CSECT 
instruction statement is as follows: 


r- “ ‘ 

| Name 

[Operation 

|Operand 

—i 
1 




-H 

JA symbol 

jCSECT 

[Not used; must 

1 

jor not 

1 

[not be present 

1 

[used 

1 

1 

1 

1 __ 



_j 


If a symbol names the CSECT instruction, 
the symbol is established as the name of 
the control section? otherwise the section 
is considered to be unnamed. All state¬ 
ments following the CSECT are assembled as 
part of that control section until a state¬ 
ment identifying a different control sec¬ 
tion is encountered (i.e., another CSECT or 
a DSECT instruction). 
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The symbol in the name field is a valid 
relocatable symbol whose value represents 
the address of the first byte of the con¬ 
trol section. It has a length attribute of 
one. 

Several CSECT statements with the same 
name may appear within a program. The 
first is considered to identify the begin¬ 
ning of the control section; the rest iden¬ 
tify the resumption of the section. Thus, 
statements from different control sections 
may be interspersed. They are properly 
assembled (assigned contiguous storage 
locations) as long as the statements from 
the various control sections are identified 
by the appropriate CSECT instructions. 


Unnamed Control Section 


If neither a named CSECT instruction nor 
START instruction appears at the beginning 
of the program, the assembler determines 
that it is to assemble an unnamed control 
section as the first (or only) control 
section. There may be only one unnamed 
control section in a program. If one is 
initiated and is then followed by a named 
control section, any subsequent unnamed 
CSECT statements are considered to resume 
the unnamed control section. If it is 
desired to write a small program that is 
unsectioned, the program does not need to 
contain a CSECT instruction. 


DSECT — Identify Dummy Section 


A dummy section represents a control sec¬ 
tion that is assembled but is not part of 
the object program. A dummy section is a 
convenient means of describing the layout 
of an area of storage without actually 
reserving the storage. (It is assumed that 
the storage is reserved either by some 
other part of this assembly or else by 
another assembly.) The DSECT instruction 
identifies the beginning or resumption of a 
dummy section. More than one dummy section 
may be defined per assembly, but each must 
be named. The typical form of the DSECT 
instruction statement is as follows: 


|Name 

|Operation 

J Operand 

i 

1 

_j 

|A symbol 

|DSECT 

1 

J Not used; must 

- 1 

1 

j 

1 

jnot be present 

j 


The symbol in the name field is a valid 
relocatable symbol whose value represents 
the first byte of the section. It has a 
length attribute of one. 

Program statements belonging to dummy 
sections may be interspersed throughout the 
program or may be written as a unit. In 
either case, the appropriate DSECT instruc¬ 
tion should precede each set of statements. 
When multiple DSECT instructions with the 
same name are encountered, the first is 
considered to initiate the dummy section 
and the rest to continue it. 

Symbols that name statements in a dummy 
section may be used in USING instructions. 
Therefore, they may be used in program 
elements (e.g., machine-instructions and 
data definitions) that specify storage 
addresses. An example illustrating the use 
of a dummy section appears subsequently 
under "Addressing Dummy Sections." 

Note : A symbol that names a statement in 
a dummy section may be used in an A-type 
address constant only if it is paired with 
another symbol (with the opposite sign) 
from the same dummy section. 


Dummy Section Location Assignment: A Loca¬ 
tion Counter is used to determine the rela¬ 
tive locations of named program elements in 
a dummy section. The Location Counter is 
always set to zero at the beginning of the 
dummy section, and the location values 
assigned to symbols that name statements in 
the dummy section are relative to the ini¬ 
tial statement in the section. 


Addressing Dummy Sections: The programmer 
may wish to describe the format of an area 

whose storage location will not be deter¬ 
mined until the program is executed. He 
can describe the format of the area in a 
dummy section, and he can use symbols 
defined in the dummy section as the oper¬ 
ands of machine instructions. To effect 
references to the storage area, he does the 
following: 

1. Provides a USING statement specifying 
both a general register that the assem¬ 
bler can assign to the machine- 
instructions as a base register and a 
value from the dummy section that the 
assembler may assume the register con¬ 
tains. 

2. Ensures that the same register is load¬ 
ed with the actual address of the stor¬ 
age area. 

The values assigned to symbols defined 
in a dummy section are relative to the 
initial statement of the section. 
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Thus, all machine-instructions which 
refer to names defined in the dummy section 
will, at execution time, refer to storage 
locations relative to the address loaded 
into the register. 


An example is shown in the following 
coding. Assume that two independent assem¬ 
blies (assembly 1 and assembly 2) have been 
loaded and are to be executed as a single 
overall program. Assembly 1 is an input 
routine that places a record in a specified 
area of storage, places the address of the 
input area containing the record in general 
register 3, and branches to assembly 2. 
Assembly 2 processes the record. The cod¬ 
ing shown in the example is from assembly 
2 . 


The input area is described in assembly 
2 by the DSECT control section named INAR¬ 
EA. Portions of the input area (i.e., 
record) that the programmer wishes to work 
with are named in the DSECT control section 
as shown. The assembler instruction USING 
INAREA,3 designates general register 3 as 
the base register to be used in addressing 
the DSECT control section, and that general 
register 3 is assumed to contain the 
address of INAREA. 


Assembly 1, during execution, loads the 
actual beginning address of the input area 
in general register 3. Because the symbols 
used in the DSECT section are defined rela¬ 


|Name 

|Operation 

|Operand 

i 

j ASMBLY2 

|CSECT 



{BEGIN 

j BALR 

{2,0 



j USING 

1 - 

1**2 

1 



I - 

jUSING 

J 

| INAREA, 3 



{CLI 

jINCODE, C*A* 



J BE 

I • 

| ATYPE 

I 


JATYPE 

1 • 
jMVC 

1 

j WORKA,INPUTA 



{MVC 

1 . 

jWORKB,INPUTB 

1 


JWORKA 

I - 

|DS 

1 

j CL20 


{WORKB 

|DS 

I . 

| CLI 8 

1 


{INAREA 

1 - 
jDSECT 

1 

1 


jINCODE 

IDS 

j CLI 


jlNPUTA 

|DS 

| CL20 


jINPUTB 

|DS 

j 

j CL18 

i 



| END 

i 

i 


|_ n _ 

1 - _ 


_j 


tive to the initial statement in the sec¬ 
tion, the address values they represent, 
will, at the time of program execution, be 
the actual storage locations of the input 
area. 


COM — DEFINE BLANK COMMON CONTROL SECTION 

The COM assembler instruction identifies 
and reserves a common area of storage that 
may be referred to by independent assem¬ 
blies that have been linked and loaded for 
execution as one overall program. 

Only one blank common control section 
may be designated in an assembly. However, 
more than one COM statement may appear 
within a program. The first identifies the 
beginning of the control section; the rest 
identify the resumption of the section. 

When several assemblies are loaded, each 
designating a common control section, the 
amount of storage reserved is equal to the 
longest common control section. The form 
is; 

jName {Operation {Operand | 

(Not {COM {Not used; must not j 

{used { {be present j 


The common area may be broken up into 
subfields through use of the DS and DC 
assembler instructions. Names of subfields 
are defined relative to the beginning of 
the common section, as in the DSECT control 
section. 

It is necessary to establish address¬ 
ability relative to a named statement with¬ 
in COM since the COM statement itself can¬ 
not have a name. In the following example, 
addressability to the common area of stor¬ 
age is established relative to the named 
statement XYZ. 


{ Name 

T 

1 

Operation 

■T" 

1 

- 4 .- 

Operand j 


1 

• 

T 

1 



1 

1 

1 

L 

i 

i 

i 

1 ,=A (XYZ) j 


1 

USING 

i 

XYZ,1 1 


1 

1 

1 

MVC 

i 

i 

PDQ(16),=4C'ABCD' 1 


1 

1 

| 

COM 

i 

i 

i 


j XYZ 

1 

DS 

i 

16F 

l PDQ 

1 

1 

1 

DS 

i 

l 

i 

16C ! 

i_ _ 

1 

1 

_1 

* 

i 

i 

.a. 
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No instructions or constants appearing 
in a common control section are assembled. 
Data can only be placed in a common control 
section through execution of the program. 

If the assignment of common storage is 
done in the same manner by each independent 
assembly, reference to a location in common 
by any assembly results in the same loca¬ 
tion being referenced. When assembled, 
blank common location assignment starts at 
zero. 


SYMBOLIC LINKAGES 


Symbols may be defined in one program and 
referred to in another, thus effecting 
symbolic linkages between independently 
assembled programs. The linkages can be 
effected only if the assembler is able to 
provide information about the linkage sym¬ 
bols to the linkage editor, which resolves 
these linkage references at load time. The 
assembler places the necessary information 
in the control dictionary on the basis of 
the linkage symbols identified by the ENTRY 
and EXTRN instructions. Note that these 
symbolic linkages are described as linkages 
between independent assemblies; more spe¬ 
cifically, they are linkages between inde¬ 
pendently assembled control sections. 

In the program where the linkage symbol 
is defined (i.e., used as a name), it must 
also be identified to the Linkage Editor 
and Assembler by means of the ENTRY assem¬ 
bler instruction. It is identified as a 
symbol that names an entry point, which 
means that another program may use that 
symbol in order to effect a branch opera¬ 
tion or a data reference. The assembler 
places this information in the control 
dietionary- 

Similarly, the program that uses a sym¬ 
bol defined in some other program must 
identify it by the EXTRN assembler instruc¬ 
tion. Since the definition of the symbol 
appears in another program, the assembler 
arbitrarily assigns a length attribute of 1 
and a value of 0. The assembler places 
this information in the control dictionary. 

Another way to obtain symbolic linkages 
is by using the V-type address constant. 

The subsection "Data Definition 
Instructions" in Section 5 contains the 
details pertinent to writing a V-type 
address constant. It is sufficient here to 
note that this constant may be considered 
an indirect linkage point. It is created 
from an externally defined symbol, but that 
symbol does not have to be identified by an 
EXTRN statement. The V-type address con¬ 
stant is intended to be used for external 


branch references (i.e., for effecting 
branches to other programs). Therefore, it 
should not be used for external data ref¬ 
erences (i.e., for referring to data in 
other program). 


ENTRY — IDENTIFY ENTRY-POINT SYMBOL 


The ENTRY instruction identifies linkage 
symbols that are defined in this program 
but may be used by some other program. The 
typical form of the ENTRY instruction 
statement is as follows; 


JName 1Operation jOperand { 


| Not 

|ENTRY 

{One or more reloca- 

— 1 

j used 

1 

jtable symbols. 



1 

{separated by 



1 

{commas, that also 



1 

{appear as state- 


i_ 

1 

-L-- 

Jroent names 

_j 


A program may contain a maximum of 100 
ENTRY symbols. ENTRY symbols which are not 
defined (not appearing as statement names), 
although invalid, will also count towards 
this maximum. 

An ENTRY statement operand may not con¬ 
tain a symbol defined in a dummy section or 
blank common. An ENTRY statement containing 
a symbol defined in an unnamed control sec¬ 
tion can be processed by the assembler, but 
the DOS/TOS Linkage Editor will not process 
the resulting deck. The following example 
identifies the statements named SINE and 
COSINE as entry points to the program. 


i- 

{Name 

i_ 

— T — - 

|Operation 

{Operand 

j _____ 

- 1 

1 

___» 

1 

t- 

{ENTRY 

jSINE,COSINE 

-1 

1 


Note ; The name of a control section does 
not have to be identified by an ENTRY 
instruction when another program uses it as 
an entry point. The assembler automat¬ 
ically places information on control sec¬ 
tion names in the control dictionary. 


EXTRN — IDENTIFY EXTERNAL SYMBOL 


The EXTRN instruction identifies linkage 
symbols that are used by this program but 
defined in some other program. Each exter¬ 
nal symbol must be identified; this 
includes symbols that name control sec- 
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tions. The typical form of the EXTRN 
instruction statement is as follows: 




|Name |Opera tion 

(Not |eXTRN 

j used j 

[ i 


t-■» 

|Operand 1 

|One or more relocata- j 
jble symbols, separated) 
jby commas. j 


The symbols in the operand field may not 
appear as names of statements in this pro¬ 
gram. The following example identifies 
three external symbols that have been used 
as operands in this program but are defined 
in some other program. 


I-T-T- 1 

| Name |Operation jOperand f 

|- 1 - 1 -^ 

| jEXTRN jRATEBL,PAYCALC . j 

j j EXTRN j WITHCALC 1 


An example that employs the EXTRN 
instruction appears subsequently under 
"Addressing External Control Sections." 


Note 1 : A V-type address constant does 
not have to be identified by an EXTRN 
statement. 


Note 2 : When external symbols are used 
in an expression they may not be paired. 
Each external symbol must be considered as 
having a unique relocatability attribute. 


Addressing External Control Sections 


A common way for a program to link to an 
external control section is to: 

1. Create a V-type address constant with 
the name of the external symbol. 


2. Load the constant into a general reg¬ 
ister and branch to the control section 
via the register. 


JName (Operation (Operand ( 


1MAINPROG 

1CSECT 

1 

“ 1 

j BEGIN 

|BALR 

(2,0 



J USING 

i 

1**2 

| 



i 

i • 

1 

1 



ii* 

(3,VCON 



j BALR 

1 - 

11* 3 

1 


|VCON 

1 • 
j DC 

1 

|V(SINE) 


I__ 

(END 

j BEGIN 



The combined number of control sections 
and dummy sections plus the number of uni¬ 
que symbols in EXTRN statements and V-type 
address constants may not exceed 255. 

(EXTRN statements are discussed in this 
section; V-type constants in Section 5 
under DC — Define Constant .) If the same 
symbol appears in a V-type address constant 
and in the name entry of a CSECT or DSECT 
statement, it is counted as two symbols. 


For example, to link to the control 
section named SINE, the preceding coding 
might be used. 

An external symbol naming data may be 
referred to as follows: 

1. Identify the external symbol with the 
EXTRN instruction, and create an 
address constant from the symbol. 

2. Load the constant into a general reg¬ 
ister, and use the register for base 
addressing. 

For example, to use an area named 
RATETBL, which is in another control sec¬ 
tion, the following coding might be used: 




(Name 

(Operation 

j Operand 

t ..... 

j 

|MAINPROG 

(CSECT 

T- 

1 

j BEGIN 

(BALR 

12,0 



(USING 

1**2 



1 - 

1 - 

1 



(EXTRN 

1 - 

j RATETBL 

1 



1 - 
II* 

1 

j 4,RATEADDR 



(USING 

j RATETBL, 4 



(A 

1 . 

j 3,RATETBL 

1 


(RATEADDR 

1 - 
(DC 

1 

(A (RATETBL) 


[ 

(END 

j BEGIN 

J 
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SECTION 4; MACHINE-INSTRUCTIONS 


This section discusses the coding of the 
machine-instructions represented in the 
assembler language- The reader is reminded 
that the functions of each machine- 
instruction are discussed in the principles 
of operation manual (see Preface). 


MACHINE-INSTRUCTION STATEMENTS 


Machine-instructions may be represented 
symbolically as assembler language 
statements- The symbolic format of each 
varies according to the actual machine- 
instruction format, of which there are 
five: RR # RX, RS, SI, and SS. Within each 
basic format, further variations are 
possible. 

The symbolic format of a machine- 
instruction is similar to, but does not 
duplicate, its actual format. Appendix C 
illustrates machine format for the five 
classes of instructions. A mnemonic opera¬ 
tion code is written in the operation 
field, and one or more operands are written 
in the operand field. Comments may be 
appended to a machine-instruction statement 
as previously explained in Section 1. 

Any machine-instruction statement may be 
named by a symbol, which other assembler 
statements can use as an operand. The 
value attribute of the symbol is the 
address of the leftmost byte assigned to 
the assembled instruction. The length 
attribute of the symbol depends on the 
basic instruction format, as follows: 

Basic Format Length Attribute 

RR 2 

RX 4 

RS 4 

SI 4 

SS 6 


Instruction Alignment and Checking 


All machine-instructions are aligned 
automatically by the assembler on half-word 
boundaries. If any statement that causes 
information to be assembled requires align¬ 
ment, the bytes skipped are filled with 
hexadecimal zeros. All expressions that 
specify storage addresses are checked to 
insure that they refer to appropriate 
boundaries for the instructions in which 


they are used. Register numbers are also 
checked to make sure that they specify the 
proper registers, as follows: 

1- Floating-point instructions must spec¬ 
ify floating-point registers 0, 2, 4, 
or 6. 

2. Double-shift, full-word multiply, and 
divide instructions must specify an 
even-numbered general register in the 
first operand. 


OPERAND FIELDS AND SUBFIELDS 


Some symbolic operands are written as a 
single field and other operands are written 
as a field followed by one or two sub¬ 
fields. For example, addresses consist of 
the contents of a base register and a dis¬ 
placement. An operand that specifies a 
base and displacement is written as a dis¬ 
placement field followed by a base register 
subfield, as follows: 40(5). In the RX 
format, both an index register subfield and 
a base register subfield are written as 
follows: 40(3,5). In the SS format, both a 
length subfield and a base register sub¬ 
field are written as follows: 40(21,5). 

Appendix C shows two types of addressing 
formats for RX, RS, SI, and SS instruc¬ 
tions. In each case, the first type shows 
the method of specifying an address expli¬ 
citly, as a base register and displacement. 
The second type indicates how to specify an 
implied address as an expression. 

For example, a load multiple instruction 
(RS format) may have either of the follow¬ 
ing symbolic operands: 

R1,R3,D2(B2) - - explicit address 

R1,R3,S2 - - implied address 

Whereas D2 and B2 must be represented by 
absolute expressions, S2 may be represented 
either by a relocatable or an absolute 
expression. 

In order to use implied addresses, the 
following rules must be observed: 

1. The base register assembler instruc¬ 
tions (USING and DROP) must be used. 

2. An explicit base register designation 
must not accompany the implied 
address. 


Machine-Instructions 
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For example, assume that FIELD is a 
relocatable symbol, which has been assigned 
a value of 7400- Assume also that the 
assembler has been notified (by a USING 
instruction) that general register 12 cur¬ 
rently contains a relocatable value of 4096 
and is available as a base register. The 
following example shows a machine- 
instruction statement as it would be 
written in assembler language and as it 
would be assembled. Note that the value of 
D2 is the difference between 7400 and 4096 
and that X2 is assembled as zero, since it 
was omitted. The assembled instruction is 
presented in hexadecimals 

Assembler statement: 

ST 4,FIELD 

Assembled instruction: 

Op.Code R1 X2 B2 D2 

50 4 0 C CE8 

An address may be specified explicitly 
as a base register and displacement (and 
index register for RX instructions) by the 
formats shown in the first column of Table 
4-1. The address may be specified as an 
implied address by the formats shown in the 
second column. Observe that the two stor¬ 
age addresses required by the SS instruc¬ 
tions are presented separately? an implied 
address may be used for one while an expli¬ 
cit address is used for the other. 


Table 4-1. Details of Address Specifi¬ 
cation 


J Type J Explicit Address| Implied Address J 

I-1--+-* 


j RX 

{D2(X2,B2) 

1 S2(X2) 



|D2(,B2) 

j S2 


| RS 

j D2(B2) 

J S2 


1 SI 

|D1(B1) 

1 si 


| SS 

JD1(L1,Bl) 

| SI(LI) 



)D1 (L, Bl) 

J S1(L) 



|D2(L2,B2) 

) S2(L2) 


1 _ 


... 4 , 7 . . _ 

_I 


A comma must be written to separate 
operands. Parentheses must be written to 
enclose a subfield or subfields, and a 
comma must be written to separate two sub¬ 
fields within parentheses. When parenthe¬ 
ses are used to enclose one subfield, and 
the subfield is omitted, the parentheses 
must be omitted. In the case of two sub¬ 
fields that are separated by a comma and 
enclosed by parentheses, the following 
rules apply: 

1. If both subfields are omitted, the 
separating coimsa and the parentheses 
must also be omitted. 


L 2,48(4,5) 

L 2,FIELD (implied address) 

2. If the first subfield in the sequence 
is omitted, the comma that separates 
it from the second subfield is writ¬ 
ten. The parentheses must also be 
written. 

MVC 32(16,5),FIELD2 

MVC BETA(,5),FIELD2 (implied length) 

3. If the second subfield in the sequence 
is omitted, the comma that separates 
it from the first subfield must be 
omitted. The parentheses must be 
written. 

MVC 32(16,5),FIELD2 

MVC FIELDl(16),FIELD2 (implied 

address) 

Fields and subfields in a symbolic oper¬ 
and may be represented either by absolute 
or by relocatable expressions, depending on 
what the field requires. (An expression 
has been defined as consisting of one term 
or a series of arithmetically combined 
terms.) Refer to Appendix C for a detailed 
description of field requirements. 

Note : Blanks may not appear in an oper¬ 
and unless provided by a character self- 
defining term or a character literal. 

Thus, blanks may not intervene between 
fields and the comma separators, between 
parentheses and fields, etc. 


LENGTHS — EXPLICIT AND IMPLIED 


The length field in SS instructions can 
be explicit or implied. To imply a length, 
the programmer omits a length field from 
the operand. The omission indicates that 
the length field is either of the 
following: 

1. The length attribute of the expression 
specifying the displacement, if an 
explicit base and displacement have 
been written. 

2. The length attribute of the expression 
specifying the effective address, if 
the base and displacement have been 
implied. 

In either case, the length attribute for 
an expression is the length of the leftmost 
terra in the expression. The length attri¬ 
bute of asterisk (*) is equal to the length 
of the instruction in which it appears, 
except that in an EQU to * statement, the 
length attribute is 1. 
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By contrast, an explicit length is writ¬ 
ten by the programmer in the operand as an 
absolute expression. The explicit length 
overrides any implied length. 

whether the length is explicit or 
implied, it is always an effective length. 
The value inserted into the length field of 
the assembled instruction is one less than 
the effective length in the machine- 
instruction statement. 

Note : If a length field of zero is 
desired, the length may be stated as zero 
or one. 

To summarize, the length required in an 
SS instruction may be specified explicitly 
by the formats shown in the first column of 
Table 4-2 or may be implied by the formats 
shown in the second column. Observe that 
the two lengths required in one of the SS 
instruction formats are presented separate¬ 
ly. An implied length may be used for one 
while an explicit length is used for the 
other. 


Table 4-2. Details of Length Specification 
in SS Instructions 

J Explicit Length | Implied Length | 


| D1(L1,B1) 

| Dl (,B1) 

j 

j Sl(Ll) 

1 si 


j D1(L,B1) 

| D1(,B1) 


j S1(L) 

1 si 


j D2(L2,B2) 

D2(,B2> 


| S2(L2) 

i S2 

J 


MACHINE-INSTRUCTION MNEMONIC CODES 


The mnemonic operation codes (shown in 
Appendix D ) are designed to be easily 
remembered codes that indicate the func¬ 
tions of the instructions. The normal 
format of the code is shown below; the 
items in brackets are not necessarily pre¬ 
sent in all codes: 

Verb[Modifier! [Data Type! [Machine Format! 

The verb, which is usually one or two 
characters, specifies the function. For 
example, A represents Add , and MV rep¬ 
resents Move. The function may be further 
defined by a modifier. For example, the 
modifier L indicates a logical function, as 
in AL for Add Logical and MV is modified by 
C (MVC) to indicate Move Characters. 

Mnemonic codes for functions involving 
data usually indicate the data types, by 


letters that correspond to those for the 
data types in the DC assembler instruction 
(see Section 5 ). Furthermore, letters U 
and W have been added to indicate short and 
long, unnormalized floating-point opera¬ 
tions, respectively. For example, AE indi¬ 
cates Add Normalized Short, whereas AU 
indicates Add Unnormalized Short. Where 
applicable, full-word fixed-point data is 
implied if the data type is omitted. 


The letters R and I are added to the 
codes to indicate, respectively, RR and SI 
machine instruction formats. Thus, AER 
indicates Add Normalized Short in the RR 
format. Functions involving character and 
decimal data types imply the SS format. 


MACHINE-INSTRUCTION EXAMPLES 


The examples that follow are grouped 
according to machine-instruction format. 
They illustrate the various symbolic oper¬ 
and formats. All symbols employed in the 
examples must be assumed to be defined 
elsewhere in the same assembly. All sym¬ 
bols that specify register numbers and 
lengths must be assumed to be equated else¬ 
where to absolute values. 

Implied addressing, control section 
addressing, and the function of the USING 
assembler instruction are not considered 
here. For discussion of these considera¬ 
tions and for examples of coding sequences 
that illustrate them, refer to Section 3 , 
Program Sectioning and Linking , and Base 
Register Instructions . 


RR Format 


j- 

-T 


_ | 

{Name 

{Operation 

I Operand 

1 

h - 

—i- 

~ +— — — 

-4 

1ALPHA1 

|LR 

11,2 


j ALPHA2 

j LR 

|REGl,REG2 


j BETA 

{SPM 

115 


j GAMMA1 

jsvc 

{250 


GAMMA2 

|SVC 

{TEN 


l__ 

_ J. _ - 

— L - 

-j 

The 

operands of 

ALPHA!, BETA, 

and GAMMA! 


are decimal self-defining values, which are 
categorized as absolute expressions. The 
operands of ALPHA2 and GAMMA2 are symbols 
that are equated elsewhere to absolute 
values. 
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RX Format 


SI Format 


| Name 

1 

|operation 

I 

|Operand 

j 

_j 

] ALPHAl 

|L 

|1,39(4,10) 

— 1 

| ALPHA2 

|L 

JREG1,39(4,TEN) 


|BETA1 

| L 

j 2,ZETA(4) 


j BETA2 

|L 

1REG2,ZETA(REG4) 


j GAMMAl 

| L 

|2,ZETA 


j GAMMA2 

| L 

|REG2,ZETA 


1GAMMA3 

| L 

|2,=F*1000 * 


j LAMBDA! 

I L 

| 3, 20 (, 5) 

-x -- 

J 


i-- 

|Name 

j 

T ~ 

j Operation 
j 

—r ~ - - - - . 

|Operand 

| __ 

j ALPHAl 

jcLI 

|40(9),X*40* 

j ALPHA2 

| CLI 

|40 (REG9),TEN 

j B ETA1 

jCLI 

j ZETA,TEN 

j BETA2 

|CLI 

j ZETA,C'A* 

jGAMMAl 

|SIO 

|40(9) 

|GAMMA2 

|SIO 

| 0 (9) 

JGAMMA3 

|SIO 

|40(0) 

j GAMMA4 

j SIO 

| ZETA 

L_ - 

X 



The ALPHA instructions and GAMMA1-GAMMA3 
specify explicit addresses, whereas the 
BETA instructions and GAMMA4 specify 

Both ALPHA instructions specify explicit implied addresses. GAMMA2 specifies a 
addresses; REG1 and TEN are absolute sym- displacement of zero. GAMMA3 does not 
bols. Both BETA instructions specify specify a base register, 

implied addresses, and both use index reg¬ 
isters. indexing is omitted from the GAMMA 
instructions. GAMMA! and GAMMA2 specify 


implied addresses. 

The second operand of 

SS Format 


GAMMA3 is 

a literal. 

LAMBDA! specifies no 




indexing. 









r~ — 

_ T - — 





|Name 

}Operation|Operand | 




1- 

—.}. - 

-+ - ^ 




jALPHAl 

j AP 

|40(9 # 8),30(6,7) } 




j ALPHA2 

| AP 

|40(NINE,REG8),30(L6,7)j 




j ALPHA3 

j AP 

|FIELD2,FIELD1 j 

RS Format 


jALPHA4 

| AP 

|FIELD2(9),FIELD1(6) | 




{BETA 

| AP 

j FIELD2(9),FIELDl | 




jGAMMAl 

IMVC 

|40(9,8),30(7) | 

f - 

T~ ' 

— r - 1 

j GAMMA2 

| MVC 

j40(NINE,REG8),DEC(7) j 

|Name 

{Operation 

j Operand 

j GAMMA3 

| MVC 

| FIELD2 , FIEIDl | 

j.- 

| "■ ,l 11,1 ■■ 

—f-J 

j GAMMA4 

JMVC 

|FIELD2(9),FIELDl | 

|ALPHAl 

| BXH 

|1,2,20(14) 

L - 

- X 

-X- -- J 

|ALPHA2 

| BXH 

iREG1,REG2,20(REGD) 




IALPHA3 

j BXH 

j REG1,REG2,ZETA 




|ALPHA4 

j SLL 

J REG2,15 

ALPHAl, ALPHA2, 

GAMMAl, and GAMMA2 spec- 

|ALPHAS 

ISLL 

j REG2,0(15) 

ify explicit lengths and addresses. ALPHA3 

L 

X-- 

-X-J 

and GAMMA3 specify 

both implied length and 




implied 

addresses. 

ALPHA4 and GAMMA4 spec- 


ify explicit length and implied addresses. 
BETA specifies an explicit length for 
FIEID2 and an implied length for FIELD1; 

Whereas ALPHA1 and ALPHA2 specify ex- both addresses are implied, 

plicit addresses, ALPHA3 specifies an 
implied address. ALPHA4 is a shift 
instruction shifting the contents of REG2 

left 15 bit positions. ALPHA5 is a shift EXTENDED MNEMONIC CODES 

instruction shifting the contents of REG2 
left by the value contained in general 

register 15. For the convenience of the programmer, the 

assembler provides extended mnemonic codes, 
which allow conditional branches to be 
specified mnemonically as well as through 
the use of the BC machine-instruction. 

These extended mnemonic codes specify both 
the machine branch instruction and the 
condition on which the branch is to occur. 
The codes are not part of the universal set 
of machine-instructions, but are translated 
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{Extended Code 

ft 

Meaning 

Machine-Instruction 

"i 

i 

j B 

D2(X2,B2) 

Branch Unconditional 

BC 

15,D2(X2,B2) 


{BR 

R2 

Branch Unconditional (RR format) 

BCR 15,R2 


{NOP 

D2(X2,B2) 

No Operation 

BC 

0,D2(X2,B2) 


{NOPR 

R2 

No Operation (RR format) 

BCR 0,R2 



Used After 

Compare Instructions 




|BH 

D2(X2,B2) 

Branch on High 

BC 

2,D2(X2,B2) 


j BL 

D2(X2,B2) 

Branch on Low 

BC 

4,D2(X2,B2) 


j BE 

D2(X2,B2) 

Branch on Equal 

BC 

8,D2(X2,B2) 


|BNH 

D2(X2,B2) 

Branch on Not High 

BC 

13,D2(X2,B2) 


| BNL 

D2(X2,B2) 

Branch on Not Low 

BC 

11,D2(X2,B2) 


J BNE 

D2(X2,B2) 

Branch on Not Equal 

BC 

7,D2(X2,B2) 



Used After 

Arithmetic Instructions 




{BO 

D2(X2,B2) 

Branch on Overflow 

BC 

1,D2(X2,B2) 


j BP 

D2(X2,B2> 

Branch on Plus 

BC 

2,D2(X2,B2) 


|BM 

D2(X2,B2) 

Branch on Minus 

BC 

4,D2(X2,B2) 


j BZ 

D2(X2,B2) 

Branch on Zero 

BC 

8,D2(X2,B2) 


j BNP 

D2(X2,B2) 

Branch on Not Plus 

BC 

13,D2(X2,B2) 


|BNM 

D2(X2,B2) 

Branch on Not Minus 

BC 

11,D2(X2,B2) 


j BNZ 

D2(X2,B2) 

Branch on Not Zero 

BC 

7,D2(X2,B2) 



Used After 

Test Under Mask Instructions 




| BO 

02 (X2,B2) 

Branch if Ones 

BC 

1,D2(X2,B2) 


|BM 

D2(X2,B2) 

Branch if Mixed 

BC 

4,D2(X2,B2) 


j BZ 

D2(X2,B2) 

Branch if Zeros 

BC 

8,D2(X2,B2) 


j BNO 

D2(X2,B2) 

Branch if Not Ones 

BC 

14,D2(X2,B2) 

_J 


Figure 4-1. Extended Mnemonic Codes 


by the assembler into the corresponding 
operation and condition combinations. 

The allowable extended mnemonic codes 
and their operand formats are shown in 
Figure 4-1, together with their machine- 
instruction equivalents. Unless otherwise 
noted, all extended mnemonics shown are for 
instructions in the RX format. Note that 
the only difference between the operand 
fields of the extended mnemonics and those 
of their machine-instruction equivalents is 
the absence of the R1 field and the comma 
that separates it from the rest of the 
operand field. The extended mnemonic list, 
like the machine-instruction list, shows 
explicit address formats only. Each 
address can also be specified as an implied 
address. 

In the following examples, which illus¬ 
trate the use of extended mnemonics, it is 
to be assumed that the symbol GO is defined 
elsewhere in the program. 


{Name | Operation {Operand j 

j~ |b 1 40 (3,6) ] 

I | B | 40 (, 6) | 

j |BL J GO(3) | 

j |BL j GO j 

j j BR |4 j 

L__JL-1- J 


The first two instructions specify an 
unconditional branch to an explicit 
address. The address in the first case is 
the sum of the contents of base register 6, 
the contents of index register 3, and the 
displacement 40; the address in the second 
instruction is not indexed. The third 
instruction specifies a branch on low to 
the address implied by GO as indexed by the 
contents of index register 3; the fourth 
instruction does not specify an index reg¬ 
ister. The last instruction is an uncondi¬ 
tional branch to the address contained in 
register 4. 
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SECTION 5; ASSEMBLER INSTRUCTION STATEMENTS 


Just as machine instructions are used to 
request the computer to perform a sequence 
of operations during program execution 
time# so assembler instructions are 
requests to the assembler to perform cer¬ 
tain operations during the assembly. 
Assembler-instruction statements# in 
contrast to machine-instruction statements, 
do not always cause machine-instructions to 
be included in the assembled program. 

Some, such as DS and DC, generate no 
instructions but do cause storage areas to 
be set aside for constants and other data. 
Others# such as EQU and SPACE# are effec¬ 
tive only at assembly time; they generate 
nothing in the assembled program and have 
no effect on the Location Counter. 


The following is a list of all the 
assembler instructions. 


SYMBOL DEFINITION INSTRUCTION 


EQU — EQUATE SYMBOL 


The EQU instruction is used to define a 
symbol by assigning to it the length, 
value, and relocatability attributes of an 
expression in the operand field- The typi¬ 
cal form of the EQU instruction statement 
is as follows: 


|Name {Operation {Operand | 

|A symbol {EQU {An expression j 


Symbol Definition Instruction 
EQU - Equate Symbol 


Data Definition Instructions 

DC - Define constant 

DS - Define Storage 

CCW - Define Channel Command Word 


The expression in the operand field may 
be absolute or relocatable. Any symbols 
appearing in the expression must be pre¬ 
viously defined. 


Program Sectioning and Linking Instruc¬ 
tions 

START - Start Assembly 
CSECT - Identify Control Section 
DSECT - Identify Dummy Section 
ENTRY - Identify Entry-point Symbol 
EXTRN - Identify External Symbol 
COM - Identify Blank Common Control 
Section 


The symbol in the name field is given 
the same attributes as the expression in 
the operand field. The length attribute of 
the symbol is that of the leftmost (or 
only) term of the expression. When that 
term is * or a self-defining term, the 
length attribute is 1- The value attribute 
of the symbol is the value of the expres¬ 
sion. 


* Base Register Instructions 

USING - Use Base Address Register 
DROP - Drop Base Address Register 

Listing Control Instructions 
TITLE - Identify Assembly output 
EJECT - Start New Page 
SPACE - Space Listing 
PRINT - Print Optional Data 

Program control Instructions 

ICTL - Input Format Control 

ISEQ - Input Sequence checking 

ORG - Set Location Counter 

LTORG - Begin Literal Pool 

CNOP - conditional No Operation 

COPY - Copy Predefined Source Coding 

END - End Assembly 

PUNCH - Punch a Card 

REPRO - Reproduce Following Card 


* Discussed in Section 3. 


The EQU instruction is the means of 
equating symbols to register numbers, 
immediate data# and other arbitrary values. 
The following examples illustrate how this 
might be done: 


{Name {Operation {Operand { 

I-+-+-1 

|REG2 {EQU |2 (general register) | 

{TEST {EQU |X»3F*(immediate data) { 


To reduce programming time, the program¬ 
mer can equate symbols to frequently used 
expressions and then use the symbols as 
operands in place of the expressions. 

Thus, in the statement 
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| Name jOperation 

I I 

j FIELD |EQU 
l _L- 


|Operand 

I 

j ALPHA-BETA*GAMMA 


I 

* 

1 

1 


| Name 

\ - 

JA symbol 
jor not 
jused 



{Operation {Operand | 

^ --I- 1 

]DC {One operand in | 

j {the format j 

j {described in the j 

j {following text. j 


FIELD is defined as ALPHA-BETA*GAMMA and 
may be used in place of it. Note, however, 
that ALPHA, BETA, and GAMMA must all be 
previously defined. 


DATA DEFINITION INSTRUCTIONS 


There are three data definition instruction 
^statements; Define Constant (DC), Define 
Storage (DS), and Define Channel Command 
Word (CCW). 

These statements are used to enter data 
constants into storage, to define and re¬ 
serve areas of storage, and to specify the 
contents of channel command words. The 
statements may be named by symbols so that 
other program statements can refer to the 
fields generated from them. The discussion 
of the DC instruction is far more extensive 
than that of the DS instruction, because 
the DS instruction is written in the same 
format as the DC instruction and may speci¬ 
fy some or all of the information that the 
DC instruction provides. Only the function 
and treatment of the statements vary. For 
this reason, the DC instruction is present¬ 
ed first and discussed in more detail than 
the DS instruction. 


DC — DEFINE CONSTANT 


The DC instruction is used to provide con¬ 
stant data in storage. It may specify one 
constant or a series of constants, thereby 
relieving the programmer of the necessity 
to write a separate data definition state¬ 
ment for each constant desired. Further¬ 
more, a variety of constants may be speci¬ 
fied; fixed-point, floating-point, decimal, 
hexadecimal, character, and storage 
addresses. (Data constants are generally 
called constants unless they are created 
from storage addresses, in which case they 
are called address constants.) The typical 
form of the DC instruction statement is as 
follows; 


Each operand consists of four subfields; 
the first three describe the constant, and 
the fourth subfield provides the constant 
or constants. The first and third sub¬ 
fields may be omitted, but the second and 
fourth must be specified. Note that more 
than one constant may be specified in the 
fourth subfield for most types of con¬ 
stants. Each constant so specified must be 
of the same type; the descriptive subfields 
that precede the constants apply to all of 
them. No blanks may occur within any of 
the subfields (unless provided as charac¬ 
ters in a character constant or a character 
self-defining term), nor may they occur 
between the subfields of an operand. 

The subfields of the DC operand are 
written in the following sequence; 

| Subfield ^ 

J 1 2 3 4 { 

1Dupli-{Type JModifiers{Constant(s) | 

jcationj | j j 

j Factor ill I 

The symbol that names the DC instruction 
is the name of the constant (or first con¬ 
stant if the instruction specifies more 
than one). Relative addressing (e.g., 
SYMBOL*2) may be used to address the var¬ 
ious constants if more than one has been 
specified, because the number of bytes 
allocated to each constant can be deter¬ 
mined. 

The value attribute of the symbol naming 
the DC instruction is the address of the 
leftmost byte (after any necessary 
alignment) of the first, or only, constant. 
The length attribute depends on two things; 
the type of constant being defined and the 
presence of a length specification. 

Implied lengths are assumed for the various 
constant types in the absence of a length 
specification. If more than one constant 
is defined, the length attribute is the 
length in bytes (specified or implied) of 
the first constant. 

Boundary alignment also varies according 
to the type of constant being specified and 
the presence of a length specification. 

Some constant types are only aligned to a 
byte boundary, but the DS instruction can 
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be used to force any type of word boundary 
alignment for them. This is explained 
under "DS — Define Storage." Other con¬ 
stants are aligned at various word boundar¬ 
ies (half, full, or double) in the absence 
of a length specification. If length is 
specified, no boundary alignment occurs for 
such constants. 

Bytes that must be skipped in order to 
align the field at the proper boundary are 
not considered to be part of the constant. 
In other words, the Location Counter is 
incremented to reflect the proper boundary 
(if any incrementing is necessary) before 
the address value is established. Thus, 
the symbol naming the constant will not 
receive a value attribute that is the loca¬ 
tion of a skipped byte. 

Any bytes skipped in aligning statements 
that do not cause information to be assem¬ 
bled are not zeroed. Thus bytes skipped to 
align a DC statement are zeroed, and bytes 
skipped to align a DS statement are not 
zeroed. 

Appendix F summarizes, in chart form, 
the information concerning constants that 
is presented in this section. 

LITERAL DEFINITIONS: The reader is remind¬ 
ed that the discussion of literals as 
machine-instruction operands (in Section 2) 
referred him to the description of the DC 
operand for the method of writing a literal 
operand. All subsequent operand specifi¬ 
cations are applicable to writing literals, 
the only differences being: 

1. The literal is preceded by an = sign. 

2. Unsigned decimal values must be used 
to express the duplication factor and 
length modifier values. 

3. The duplication factor may not be 
zero. 

4. S-type address constants may not be 
specified. 

5. Signed or unsigned decimal values must 
be used for exponent and scale modifi¬ 
er values. 

Examples of literals appear throughout 
the balance of the DC instruction discus¬ 
sion. 


Operand Subfield 1: Duplication Factor 


The duplication factor may be omitted. If 
specified, it causes the constant(s) to be 
generated the number of times indicated by 
the factor. The factor may be specified 
either by an unsigned decimal self-defining 
term or by a positive absolute expression 
that is enclosed by parentheses. The 


duplication factor is applied after the 
constant is assembled. All symbols in the 
expression must be previously defined. 

Note that a duplication factor of zero 
is permitted except in a literal and 
achieves the same result as it would in a 
DS instruction- A DC instruction with a 
zero duplication factor will not produce 
control dictionary entries. See "Forcing 
Alignment" tinder "DS — Define Storage." 

Note ; If duplication is specified for an 
address constant containing a Location 
Counter reference, the value of the Loca¬ 
tion Counter used in each duplication is 
incremented by the length of the operand. 


Operand Subfield 2: Type 


The type subfield defines the type of con¬ 
stant being specified. From the type 
specification, the assembler determines how 
it is to interpret the constant and trans¬ 
late it into the appropriate machine for¬ 
mat. The type is specified by a single¬ 
letter code as shown in Figure 5-1. 

Further information about these 
constants is provided in the discussion of 
the constants themselves under "Operand 
Subfield 4: Constant." 


Operand Subfield 3: Modifiers 


Modifiers describe the length in bytes 
desired for a constant (in contrast to an 
implied length), and the scaling and expo¬ 
nent for the constant. If multiple modifi¬ 
ers are written, they must appear in this 
sequence: length, scale, exponent. Each is 
written and used as described in the fol¬ 
lowing text. 

LENGTH MODIFIER: This is written as Ln, 
where n is either an unsigned decimal self¬ 
defining term or a positive absolute 
expression enclosed by parentheses. Any 
symbols in the expression must be previous¬ 
ly defined. The value of n represents the 
number of bytes of storage that are assem¬ 
bled for the constant. The maximum value 
permitted for the length modifiers supplied 
for the various types of constants is sum¬ 
marized in Appendix F. This table also 
indicates the implied length for each type 
of constant; the implied length is used 
unless a length modifier is present. A 
length modifier may be specified for any 
type of constant. However, no boundary 
alignment will be provided when a length 
modifier is given. 
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1 


Code 

Type of Constant 

Machine Format 

c 

Character 

8-bit code for each character 

X 

Hexadecimal 

4-bit code for each hexadecimal digit 

B 

Binary 

binary format 

F 

Fixed-point 

Signed, fixed-point binary format; 
normally a full word 

H 

Fixed-point 

Signed, fixed-point binary format; 
normally a half word 

E 

Floa ting-point 

Short floating-point format; 
normally a full word 

D 

Floa ting-point 

Long floating-point format; 
normally a double word 

P 

Decimal 

Packed decimal format 

Z 

Decimal 

Zoned decimal format 

A 

Address 

Value of address; normally a full word 

Y 

Address 

Value of address; normally a half word 

S 

Address 

Base register and displacement value; 
a half word 

V 

Address 

Space reserved for external 
symbol addresses; each 
address normally a full word 


Figure 5-1. Type Codes for Constants 


SCALE MODIFIER: This modifier is written 
as Sn, where n is either a decimal value or 
an absolute expression enclosed by paren¬ 
theses. Any symbol in the expression must 
be previously defined. The decimal value 
or the parenthesized expression may be 
preceded by a sign; if none is present, a 
plus sign is assumed. The maximum values 
for scale modifiers are summarized in 
Appendix F. 

A scale modifier may be used with fixed- 
point <F, H) and floating-point (E, D) 
constants only, it is used to specify the 
amount of internal scaling that is desired, 
as follows. 

Scale Modifier for Fixed-Point Constants; 
the scale modifier specifies the power of 
two by which the constant must be 
multiplied after it has been converted to 
its binary representation. Just as multi¬ 
plication of a decimal number by a power of 
10 causes the decimal point to move, multi¬ 
plication of a binary number by a power of 
two causes the binary point to move. This 
multiplication has the effect of moving the 
binary point away from its assumed position 
in the binary field; the assumed position 
being to the right of the rightmost posi¬ 
tion. 

Thus, the scale modifier indicates ei¬ 
ther of the following: (1) the number of 
binary positions to be occupied by the 
fractional portion of the binary number, or 
(2) the number of binary positions to be 
deleted from the integral portion of the 
binary number. A positive scale of x 


shifts the integral portion of the number x 
binary positions to the left, thereby re¬ 
serving the rightmost x binary positions 
for the fractional portion. A negative 
scale shifts the integral portion of the 
number right, thereby deleting rightmost 
integral positions. If a scale modifier 
does not accompany a fixed-point constant 
containing a fractional part, the fraction¬ 
al part is lost. 

In all cases where positions are lost 
because of scaling (or the lack of 
scaling ) 0 rounding occurs in the leftmost 
bit of the lost portion. The rounding is 
reflected in the rightmost position saved. 

Scale Modifier for Floating-Point Con¬ 
stants : Only a positive scale modifier may 
be used with a floating-point constant. It 
indicates the number of hexadecimal posi¬ 
tions that the fraction is to be shifted to 
the right. Note that this shift amount is 
in terms of hexadecimal positions, each of 
which is four binary positions. (A posi¬ 
tive scaling actually indicates that the 
point is to be moved to the left. However, 
a floating-point constant is always con¬ 
verted to a fraction, which is hexadeci- 
mally normalized. The point is assumed to 
be at the left of the leftmost position in 
the field. Since the point cannot be moved 
left, the fraction is shifted right.) 

Thus, scaling that is specified for a 
floating-point constant provides an assem¬ 
bled fraction that is unnormalized, i.e., 
contains hexadecimal zeros in the leftmost 
positions of the fraction. When the frac- 
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tion is shifted, the exponent is adjusted 
accordingly to retain the correct magni¬ 
tude. When hexadecimal positions are lost, 
rounding occurs in the leftmost hexadecimal 
position of the lost portion. The rounding 
is reflected in the rightmost hexadecimal 
position saved. 

EXPONENT MODIFIER; This modifier is writ¬ 
ten as En, where n is either a decimal 
self-defining term or an absolute expres¬ 
sion enclosed by parentheses. Any symbols 
in the expression must be previously 
defined. The decimal value or the paren¬ 
thesized expression may be preceded by a 
sign; if none is present, a plus sign is 
assumed. The maximum values for exponent 
modifiers are summarized in Appendix F . 

An exponent modifier may be used with 
fixed-point (F, H) and floating-point (E, 

D) constants only. The modifier denotes 
the power of 10 by which the constant is to 
be multiplied before its conversion to the 
proper internal format. 

This modifier is not to be confused with 
the exponent of the constant itself, which 
is specified as part of the constant and is 
explained under "operand Subfield 4; con¬ 
stant. " Both are denoted in the same 
fashion, as En. The exponent modifier 
affects each constant in the operand, 
whereas the exponent written as part of the 
constant only pertains to that constant. 
Thus, a constant may be specified with an 
exponent of *2, and an exponent modifier of 
♦5 may precede the constant. In effect, 
the constant has an exponent of +7. 

Note that there is a maximum value, both 
positive and negative, listed in Appendix F 
for exponents. This applies to the expo¬ 
nent modifier and to the sum of the expo¬ 
nent modifier and the exponent specified as 
part of the constant. 


Operand Subfield 4; Constant 


This subfield supplies the constant (or 
constants) described by the subfields that 
precede it. A data constant (all types 
except A,Y,s,and V) is enclosed by apos¬ 
trophes . An address constant (types A, Y, 
S, and V) is enclosed by parentheses. To 
specify two or more constants in the sub¬ 
field, the constants must be separated by 
commas and the entire sequence of constants 
must be enclosed by the appropriate delimi¬ 
ters (i.e., apostrophes or parentheses). 
Thus, the format for specifying the 
constant(s) is one of the following: 

Single Multiple 

Constant Constants* 


•constant* 'constant,...,constant* 

(constant) (constant,...,constant) 

* Not permitted for character, hexadecimal, 
and binary constants. 

All constant types except character (C), 
hexadecimal (X), binary (B), packed decimal 
(P), and zoned decimal (Z), are aligned on 
the proper boundary, as shown in Appendix 
F, unless a length modifier is specified. 

In the presence of a length modifier, no 
boundary alignment is performed. If the 
operand specifies more than one constant, 
any necessary alignment applies to the 
first constant only. Thus, for an operand 
that provides five full-word constants, the 
first would be aligned on a full-word 
boundary, and the rest would automatically 
fall on full-word boundaries. 

The total storage requirement of the 
operand is the product of the length times 
the number of constants in the operand 
times the duplication factor (if present) 
plus any bytes skipped for boundary align¬ 
ment. 

If an address constant contains a Loca¬ 
tion counter reference, the Location Count¬ 
er value that is used is the storage 
address of the first byte the constant will 
occupy. Thus, if several address constants 
in the same instruction refer to the Loca¬ 
tion Counter, the value of the Location 
Counter varies from constant to constant. 
Similarly, if a single constant is speci¬ 
fied (and it is a Location Counter 
reference) with a duplication factor, the 
constant is duplicated with a varying Loca¬ 
tion Counter value. 

E and H constants are converted as if 
they were D and F, respectively, and then 
shortened. 

The subsequent text describes each of 
the constant types and provides examples. 


Character Constant — C: Any of the valid 
256 punch combinations may be designated in 
a character constant. Only one character 
constant may be specified per statement. 

Special consideration must be given to 
representing apostrophes and ampersands as 
characters. Each apostrophe or ampersand 
desired as a character in the constant must 
be represented by a pair of apostrophes or 
ampersands. Only one apostrophe or amper¬ 
sand appears in storage. 

The maximum length of a character con¬ 
stant is 256 bytes. No boundary alignment 
is performed. Each character is translated 
into one byte. Double apostrophes or dou¬ 
ble ampersands count as one character. If 
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no length modifier is given, the size in 
bytes of the character constant is equal to 
the number of characters in the constant. 

If a length modifier is provided, the 
result varies as follows: 


1. If the number of characters in the 
constant exceeds the specified length, 
as many rightmost bytes as necessary 
are dropped. 

2. If the number of characters is less 
than the specified length, the excess 
rightmost bytes are filled with 
blanks. 

In the following example, the length 
attribute of FIELD is 12: 


| Name |Operation |Operand j 

|-1-.j- 

j FIEID |DC |C*TOTAL IS 110* J 


However, in this next example, the 
length attribute is 15, and three blanks 
appear in storage to the right of the zero: 

|Name {Operation |Operand | 

[fIELD | DC | CL15* TOTAL IS 110* | 


In the next example, the length attri¬ 
bute of FIELD is 12, although 13 characters 
appear in the operand. The two ampersands 
count as only one byte. 

|Name {Operation |Operand { 

[fIEID |dC j"c * TOTAL IS 6610* ] 

1 11 J 


Note that in the next example, a length 
of four has been specified, but there are 
five characters in the constant. 


{Name 

| operation 

J Operand 

~i 

j FIEID 

i 

I 

i 

! 

1 a ! 

i 1 

J3CL4*ABODE* 

_j 


The generated constant would be: 

ABCDABCDABC D 

On the other hand, if the length had 


been specified as six instead of four, the 
generated constant would have been: 

ABCDE ABODE ABODE 

Note that the same constant could be 
specified as a literal. 


i- 

{Name 

L- 

J Operat ion 
j 

{Operand 

— - - i 

1 

1— 

1 

i- 

j MVC 

—L- 

j AREA(12) 

. J. —- 

1 

,=3CL4*ABODE*{ 


Hexadecimal Constant — X: A hexadecimal 
constant consists of one or more of the 
hexadecimal digits, which are 0-9 and A-F. 
Only one hexadecimal constant may be speci¬ 
fied per statement. The maximum length of 
a hexadecimal constant is 256 bytes (512 
hexadecimal digits). No word boundary 
alignment is performed. 

Constants that contain an even number of 
hexadecimal digits are translated as one 
byte per pair of digits. If an odd number 
of digits is specified, the leftmost byte 
has the leftmost four bits filled with a 
hexadecimal zero, while the rightmost four 
bits contain the odd (first) digit. 

If no length modifier is given, the 
implied length of the constant is half the 
number of hexadecimal digits in the con¬ 
stant (assuming that a hexadecimal zero is 
added to an odd number of digits). If a 
length modifier is given, the constant is 
handled as follows: 

1. If the number of hexadecimal digit 
pairs exceeds the specified length, 
the necessary leftmost bits (and/or 
bytes) are dropped. 

2. If the number of hexadecimal digit 
pairs is less than the specified 
length, the necessary bits (and/or 
bytes) are added to the left and 
filled with hexadecimal zeros. 

An eight-digit hexadecimal constant 
provides a convenient way to set the bit 
pattern of a full binary word- The con¬ 
stant in the following example would set 
the first and third bytes of a word to 1*s. 


{Name {Operation {Operand | 

f IDS 1 OF ] 

j TEST {DC J X # FF00FF00* | 


The DS instruction sets the location 
counter to a full word-boundary. 
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The next example uses a hexadecimal 
constant as a literal and inserts Is into 
bits 24 through 31 of register 5. 


T --- r - T -T 

|Name {operation JOperand | 

j |IC |5,=X* FF* INSERT CHAR. | 


In the following example, the digit A 
would be dropped, because five hexadecimal 
digits are specified for a length of two 
bytes: 

|Name {Operation {operand { 

h--I--I- 1 

I AI*P BACON {DC j 3XL2*A6F4E* j 

III I 

l-J.-L-J 

The resulting constant would be 6F4E, 
which would occupy the specified two bytes. 
It would then be duplicated three times, as 
requested by the duplication factor. If it 
had merely been specified as X*A6F4E*, the 
resulting constant would have had a hexa¬ 
decimal zero in the leftmost position: 

0A6F4E 


Binary constant — B: A binary constant is 
written using l*s and 0*s enclosed in apos¬ 
trophes. only one binary constant nay be 
specified in a statement. Duplication and 
length may be specified. The maximum 
length of a binary constant is 256 bytes. 

The implied length of a binary constant 
is the number of bytes occupied by the 
constant including any padding necessary. 
Padding or truncation takes place on the 
left. The padding bit used is a 0. 

The following example shows the coding 
used to designate a binary constant. BCON 
would have a length attribute of one. 


[Name Jo peration J Operand | 

[bcon |dc |b*11011101* 1 

{BTRUNC {DC |BL1*100100011* j 

|BPAD {DC JBid*101* j 

BTRUNC would assemble with the leftmost 
bit truncated, as follows: 

00100011 

BPAD would assemble with five zeros as 
padding, as follows: 


00000101 

Fixed-Point Constants — F and H: A fixed- 
point constant is written as a decimal 
number, which may be followed by a decimal 
exponent if desired. The number may be an 
integer, a fraction, or a mixed number 
(i.e., one with integral and fractional 
portions). The format of the constant is 
as follows: 

1. The number is written as a signed or 
unsigned decimal value. The decimal 
point may be placed before, within, or 
after the number, or it may be 
omitted, in which case the number is 
assumed to be an integer. A positive 
sign is assumed if an unsigned number 
is specified. Unless a scale modifier 
accompanies a mixed number or frac¬ 
tion, the fractional portion is lost, 
as explained under Subfield 3: Modifi¬ 
ers . 

2. The exponent is optional. If speci¬ 
fied, it is written immediately after 
the number as En, where n is an 
optionally signed decimal value speci¬ 
fying the exponent of the factor 10. 
The exponent may be in the range -85 
to 475. If an unsigned exponent is 
specified, a plus sign is assumed. 

The exponent causes the value of the 
constant to be adjusted by the power 
of 10 that it specifies. The exponent 
may exceed the permissible range for 
exponents provided that the sum of the 
exponent and the exponent modifier do 
not exceed that range. 

The number is converted to a binary 
number. The binary number is then rounded 
and assembled into the proper field, 
according to the specified or implied 
length. If the value of the number exceeds 
the length specified or implied, the sign 
is lost, the necessary leftmost bits are 
truncated to the length of the field and 
the value is then assembled into the whole 
field. Any duplication factor that is 
present is applied after the constant is 
assembled. A negative number is carried ir 
2*s complement form. The resulting number 
will not differ from the exact value by 
more than one in the last place. 

An implied length of four bytes is 
assumed for a full-word (F) and two bytes 
for a half-word (H), and the constant is 
aligned to the proper full-word or half¬ 
word boundary, if a length is not 
specified. However, any length up to and 
including eight bytes may be specified for 
either type of constant by a length modifi¬ 
er, in which case no boundary alignment 
occurs. 

Maximum and minimum values, exclusive of 
scaling, for fixed-point constants are: 
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Lenath 

Max 

Min 

8 

2«-l 

-2 63 

4 

2 3 *-l 

-2 31 

2 

2**-l 

-2 A * 

1 

2 7 -l 

-2 7 


A field of three full-words is generated 
from the statement shown below. The loca¬ 
tion attribute of CONWRD is the address of 
the leftmost byte of the first word, and 
the length attribute is four, the implied 
length for a full-word fixed-point con¬ 
stant. The expression CONWRD+4 could be 
used to address the second constant (second 
word) in the field. 


r- t -r- 

|Name |Operation fOperand 

JcONWRD |DC |3F*658474* 


I 

-I 

1 


J 


The next statement causes the generation 
of a two-byte field containing a negative 
constant. Notice that scaling has been 
specified in order to reserve six bits for 
the fractional portion of the constant. 


r- t- 

|Name |Operation 


j HALFCON j DC 


|Operand | 

|HS6*-25.46 * ] 


The next constant (3.50) is multiplied 
by 10 to the -2 before being converted to 
its binary format. The scale modifier 
reserves twelve bits for the fractional 
portion. 


I- r -T-1 

|Name |Operation (Operand ) 

j-1----f- 

j FULLCON j DC |HS12*3.50E-2 * j 


The same constant could be specified as 
a literal: 


| Name |Operation |Operand 

| AH |7,=HSl2*3.50E-2* 

I-L-1-- 



The final example specifies three con¬ 
stants. Notice that the scale modifier 
requests four bits for the fractional por¬ 
tion of each constant. The four bits are 


provided whether or not the fraction 
exists. 


(Name (Operation (Operand ( 

I-|-■(-H 

(THREECON (DC JFS4* 10,25.3,100* | 

I--1-L-J 


Floating-Point Constants — E and D: A 
floating-point constant is written as a 
decimal number, which may be followed by a 
decimal exponent, if desired. The number 
may be an integer, a fraction, or a mixed 
number (i.e., one with integral and frac¬ 
tional portions). The format of the con¬ 
stant is as follows: 

1. The number is written as a signed or 
unsigned decimal value. The decimal 
point may be placed before, within, or 
after the number, or it may be omit¬ 
ted, in which case, the number is 
assumed to be an integer. A positive 
sign is assumed if an unsigned number 
is specified. 

2. The exponent is optional. If speci¬ 
fied, it is written immediately after 
the number as En, where n is an 
optionally signed decimal value speci¬ 
fying the exponent of the factor 10. 
The exponent may exceed the permissi¬ 
ble range for exponents, provided that 
the sum of the exponent and the expo¬ 
nent modifier does not exceed that 
range. If an unsigned exponent is 
specified, a plus sign is assumed. 

Machine format for a floating-point 
number is in two parts: the portion con¬ 
taining the exponent, which is sometimes 
called the characteristic, followed by the 
portion containing the fraction, which is 
sometimes called the mantissa. Therefore, 
the number specified as a floating-point 
constant must be converted to a fraction 
before it can be translated into the proper 
format. For example, the constant 27.35E2 
represents the number 27.35 times 10 to the 
2nd. Represented as a fraction, it would 
be .2735 times 10 to the 4th, the exponent 
having been modified to reflect the shift¬ 
ing of the decimal point. The exponent may 
also be affected by the presence of an 
exponent modifier, as explained under Oper¬ 
and Subfield 3: Modifiers. 


The exponent is then translated into its 
binary equivalent, and the fraction is 
converted to a binary number. Scaling is 
performed if specified; if not, the frac¬ 
tion is normalized (leading hexadecimal 
zeros are removed). Rounding of the frac¬ 
tion is then performed according to the 
specified or implied length, and the number 
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is assembled into the proper field- Within 
the portion of the floating-point field 
allocated to the fraction, the hexadecimal 
point is assumed to be to the left of the 
leftmost hexadecimal digit, and the frac¬ 
tion occupies the leftmost portion of the 
field. Negative fractions are carried in 
true representation, not in the 2*s comple¬ 
ment form. The resulting number will not 
differ from the exact value by more than 
one in the last place. 

An implied length of four bytes is 
assumed for a full-word (E) and eight bytes 
is assumed for a double-word (D). The 
constant is aligned at the proper word or 
double word boundary if a length is not 
specified. However, any length up to and 
including eight bytes may be specified for 
either type of constant by a length modifi¬ 
er, in which case no boundary alignment 
occurs. 

Any of the following statements could be 
used to specify 46.415 as a positive, full- 
word* floating-point constant; the last is 
a machine-instruction statement with a 
literal operand. Note that the last two 
constants contain an exponent modifier. 




{Name 

L _ 

{Operation 

1 Operand 

1 

--1 

r — 

|dc 

[e* 46.415* 


j DC 

jE* 46415E-3* 



j DC 

j E* +464.15E-1* 



|DC 

|E*♦.46415E+2* 



j DC 

|E22*.46415* 



J AE 

j 6,=EE2*.46415* 


i_ 

_i_ 

_1__ t ____ __ ______ 

_ _ _ _ _ | 


The following would each be generated as 
double-word floating-point constants. 

{Name |operation |operand | 

IFLOAT |DC }DE+4*+46,-3.729,+473*] 

I-1__L-J 


Decimal Constants — P and Z: A decimal 
constant is written as a signed or unsigned 
decimal value- If the sign is omitted, a 
plus sign is assumed. The decimal point 
may be written wherever desired or may be 
omitted. Scaling and exponent modifiers 
may not be specified for decimal constants. 
The maximum length of a decimal constant is 
16 bytes. No word boundary alignment is 
performed. 

The placement of a decimal point in the 
definition does not affect the assembly of 
the constant in any way, because, unlike 
fixed-point and floating-point constants, a 
decimal constant is not converted to its 
binary equivalent. The fact that a decimal 


constant is an integer, a fraction, or a 
mixed number is not pertinent to its 
generation. Furthermore, the decimal point 
is not assembled into the constant. The 
programmer may determine proper decimal 
point alignment either by defining his data 
so that the point is aligned or by select¬ 
ing machine-instructions that will operate 
on the data properly (i.e., shift it for 
purposes of alignment). 


If zoned decimal format is specified 
(Z), each decimal digit is translated into 
one byte. The translation is done accord¬ 
ing to the character set shown in Appendix 
A. The rightmost byte contains the sign as 
well as the rightmost digit. For packed 
decimal format <P), each pair of decimal 
digits is translated into one byte. The 
rightmost digit and the sign are translated 
into the rightmost byte. The bit configu¬ 
ration for the digits is identical to the 
configurations for the hexadecimal digits 
0-9 as shown in Section 3 under 
"Hexadecimal Self-Defining Value." For 
both packed and zoned decimals, a plus sign 
is translated into the hexadecimal digit C, 
and a minus sign into the digit D. 


If an even number of packed decimal 
digits is specified, one digit will be left 
unpaired, because the rightmost digit is 
paired with the sign. Therefore, in the 
leftmost byte, the leftmost four bits will 
be set to zeros and the rightmost four bits 
will contain the odd (first) digit. 


If no length modifier is given, the 
implied length for either constant is the 
number of bytes the constant occupies 
(taking into account the format, sign, and 
possible addition of zero bits for packed 
decimals). If a length modifier is given, 
the constant is handled as follows: 


1. If the constant requires fewer bytes 
than the length specifies, the neces¬ 
sary number of bytes is added to the 
left. For zoned decimal format, the 
decimal digit zero is placed in each 
added byte. For packed decimals, the 
bits of each added byte are set to 
zero. 

2. If the constant requires more bytes 
than the length specifies, the neces¬ 
sary number of leftmost digits or 
pairs of digits is dropped, depending 
on which format is specified. 


Examples of decimal constant definitions 
follow. 
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I-I- T - 

| Name | Operation {Operand 
|-^- i - 


j DC 

|P*♦1.25* 

j DC 

|Z*-543* 

j DC 

|Z* 79.68' 

j DC 

1PL3* 79. 68 

_J_ 

-x _ 


I 

A 

1 




The following statement specifies three 
packed decimal constants. The length modi¬ 
fier applies to each packed decimal con¬ 
stant. 


1-T-T-1 

J Name |Operation!Operand J 

|-+-+-1 

|DECIMALS]DC |PL8 f *25.8,-3874,*2.3* | 

i_i_:_ jl--j 


The last example illustrates the use of 
a packed decimal literal. 


(Name jOperation 


lUNPK 


|Operand 

|OUTAREA,=PL2*♦25* 
.J- 


ADDRESS CONSTANTS: An address constant is 
a storage address that is translated into a 
constant. Address constants are normally 
used for initializing base registers to 
facilitate the addressing of storage. 
Furthermore, they provide the means of 
communicating between control sections of a 
multisection program. However, storage 
addressing and control section communi¬ 
cation are also dependent on the use of the 
USING assembler instruction and the loading 
of registers, coding examples that illus¬ 
trate these considerations are provided in 
Section 3 under "Programming with the Using 
Instruction." 


complex relocatable expression might con¬ 
sist of external symbols (which cannot be 
paired) and designate an address in an 
independent assembly that is to be linked 
and loaded with the assembly containing the 
address constant. 

The value of the expression is deter¬ 
mined when the referenced control sections 
are loaded. Complex relocatable expres¬ 
sions can be used to determine the distance 
between two control sections after they are 
loaded into main storage. 

A-Type Address Constant; This constant is 
specified as an absolute, relocatable, or 
complex relocatable expression. (Remember 
that an expression may be single term or 
multiterm.) The value of the expression is 
calculated to 32 bits as explained in Sec¬ 
tion 2, with one exception: the maximum 
value of the expression may be 2 3a —1. The 
value is then truncated on the left, if 
necessary, to the specified or implied 
length of the field and assembled into the 
rightmost bits of the field. The implied 
length of an A-type constant is four bytes 
and alignment is to a full-word boundary 
unless a length is specified, in which case 
no alignment will occur. The length that 
may be specified depends on the type of 
expression used for the constant; a length 
of 1-4 bytes may be used for an absolute 
expression, while a length of 3 or 4 bytes 
may be used for a relocatable or complex 
relocatable expression. 

In the following examples, the field 
generated from the statement named ACONST 
contains four constants, each of which 
occupies four bytes. Note that there is a 
Location Counter reference in one. The 
value of the Location counter will be the 
address of the first byte allocated to the 
fourth constant. The second statement 
shows the same set of constants specified 
as literals (i.e., address constant 
literals). 


An address constant, unlike other types 
of constants, is enclosed in parentheses. 

If two or more address constants are speci¬ 
fied in a statement, they are separated by 
commas, and the entire sequence is enclosed 
by parentheses. There are four types of 
address constants: A, Y, S, and V. 


|Name |Operation 


|Operand 


jACONST |DC 

I I 

I |LM 


|A(108,LOOP, 

|END-STRT,*+4096) 
|4,7,=A(108,LOOP, 
J END-STRT,*-*-4096) 


I X | 




Complex Relocatable Expressions: A complex 
relocatable expression can only be used in 
an A-type or Y-type address constant. 

These expressions contain two or more 
unpaired relocatable terms and/or a nega¬ 
tive relocatable term in addition to any 
absolute or paired relocatable terms that 
may be present. In contrast to relocatable 
expressions, complex relocatable expres¬ 
sions may represent negative values. A 


Note : When the Location Counter ref¬ 
erence occurs in a literal, as in the LM 
instruction above, the value of the Loca¬ 
tion counter is the address of the first 
byte of the instruction. 

Y-type Address Constant: A Y-type address 
constant has much in common with the A-type 
constant. It, too, is specified as an 
absolute, relocatable, or complex relocata- 
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ble expression. The value of the expres¬ 
sion is also calculated to 32 bits as 
explained in Section 2. However, the maxi¬ 
mum value of the expression may be only 
2 1S -1. The value is then truncated, if 
necessary, to the specified or implied 
length of the field and assembled into the 
rightmost bits of the field. The implied 
length of a Y-type constant is two bytes 
and alignment is to a half-word boundary 
unless a length is specified, in which case 
no alignment occurs. The maximum length of 
a Y-type address constant is two bytes. If 
length specification is used, a length of 
two bytes may be designated for a relocata¬ 
ble or complex expression and 1 or 2 bytes 
for an absolute expression. 


Warning: Specification of relocatable 

Y-type address constants should be avoided 
in programs destined to be executed on 
machines having more than 32,767 bytes of 
storage capacity. 


S-Type Address Constant: The S-type 
address constant is used to store an 
address in base-displacement form. 

The constant may be specified in two 
ways: 

1. As an absolute or relocatable expres¬ 
sion, e.g., S(BETA). 

2. As two absolute expressions, the first 
of which represents the displacement 
value and the second, the base reg¬ 
ister, e.g., S (400 (13)). 

The address value represented by the 
expression in (1) will be broken down by 
the assembler into the proper base register 
and displacement value. An S-type constant 
is assembled as a half word and aligned on 
a half-word boundary. The leftmost four 
bits of the assembled constant represents 
the base register designation, the remain¬ 
ing 12 bits the displacement value. 

If length specification is used, only 
two bytes may be specified. S-type address 
constants may not be specified as literals. 

V-Type Address Constant: This constant is 
used to reserve storage for the address of 
an external symbol that is used for effect¬ 
ing branches to other programs. The con¬ 
stant may not be used for external data 
references. The constant is specified as 
one relocatable symbol, which need not be 
identified by an EXTRN statement. Whatever 
symbol is used is assumed to be an external 
symbol by virtue of the fact that it is 
supplied in a V-type address constant. 


Note that specifying a symbol as the 
operand of a V-type constant does not con¬ 
stitute a definition of the symbol for this 
assembly. The implied length of a V-type 
address constant is four bytes, and bound¬ 
ary alignment is to a full word. A length 
modifier may be used to specify a length of 
either three or four bytes, in which case 
no such boundary alignment occurs. In the 
following example, 12 bytes will be res¬ 
erved, because there are three symbols. 

The value of each assembled constant will 
be zero until the program is loaded. 


|Name |Operation |Operand | 

|VCONST |DC |V(SORT,MERGE,CALC) | 


DS — DEFINE STORAGE 


The DS instruction is used to reserve areas 
of storage and to assign names to those 
areas. The use of this instruction is the 
preferred way of symbolically defining 
storage for work areas, input/output areas, 
etc. The typical form of the DS statement 
is: 


|Name 

r - - —r — — i 

Operation |Operand | 

... ... i i 

j_ _ 

jA symbol 
l or 

|not used 

1 

[_ 

1 1 
DS |One operand | 

jwritten in the j 

jformat described | 
jin the following j 
j text j 


The format of the DS operand is identi¬ 
cal to that of the DC operand; exactly the 
same subfields are employed and are written 
in exactly the same sequence as they are in 
the DC operand. Although the formats are 
identical, there are two differences in the 
specification of subfields. They are: 

1. The specification of data (subfield 4) 
is optional in a DS operand, but it is 
mandatory in a DC operand. If a con¬ 
stant is specified, it must be valid. 

2. The maximum length that may be speci¬ 
fied for character (C) and hexadecimal 
(X) field types is 65,535 bytes rather 
than 256 bytes. 

If a DS operand specifies a constant in 
subfield 4, and no length is specified in 
subfield 3, the assembler determines the 
length of the data and reserves the 
appropriate amount of storage. It does not 
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assemble the constant . The ability to 
specify data and have the assembler calcu¬ 
late the storage area that would be 
required for such data is a convenience to 
the programmer. If he knows the general 
format of the data that will be placed in 
the storage area during program execution* 
all he needs to do is show it as the fourth 
subfield in a DS operand. The assembler 
then determines the correct amount of stor¬ 
age to be reserved* thus relieving the 
programmer of length considerations. 


If the DS instruction is named by a 
symbol* its value attribute is the location 
of the leftmost byte of the reserved area. 
The length attribute of the symbol is det¬ 
ermined in the same manner as for a DC. 

Any positioning required for aligning the 
storage area to the proper type of boundary 
is done before the address value is deter¬ 
mined. Bytes skipped for alignment are not 
set to zero. 

Each field type (e.g«* hexadecimal* 
character, floating-point) is associated 
with certain characteristics (these are 
summarized in Appendix F). The associated 
characteristics will determine which field- 
type code the programmer selects for the DS 
operand and what other information he adds* 
notably a length specification or a 
duplication factor. For example* the E 
floating-point field and the F fixed-point 
field both have an implied length of four 
bytes- The leftmost byte is aligned to a 
full-word boundary. Thus* either code 
could be specified if it were desired to 
reserve four bytes of storage aligned to a 
full-word boundary. To obtain a length of 
eight bytes, one could specify either the E 
or F field type with a length modifier of 
eight. However, a duplication factor would 
have to be used to reserve a larger area, 
because the maximum length specification 
for either type is eight bytes. Note also 
that specifying length would cancel any 
special boundary alignment. 

In contrast, packed and zoned decimal (P 
and z) , character (C)* hexadecimal (X), and 
binary (B) fields have an implied length of 
one byte. Any of these codes* if used, 
would have to be accompanied by a length 
modifier, unless just one byte is to be 
reserved. Although no alignment occurs, 
the use of C and X field types permits 
greater latitude in length specifications, 
the maximum for either type being 65,535 
bytes. (Note that this differs from the 
maximum for these types in a DC instruc¬ 
tion.) Unless a field of one byte is 
desired* either the length must be speci¬ 
fied for the C, X* P, Z* or B field types, 
or else the data must be specified (as the 
fourth subfield)* so that the assembler can 
calculate the length. 


To define four 10-byte fields and one 
100-byte field* the respective DS state¬ 
ments might be as follows: 


|Name JOperation (Operand | 

(FIELD IDS (4CL10 | 

( AREA (DS J CL100 j 

I-L-JL-J 


Although FIELD might have been specified 
as one 40-byte field* the preceding defini¬ 
tion has the advantage of providing FIELD 
with a length attribute of 10. This would 
be pertinent when using FIELD as a SS 
machine-instruction operand. 


Additional examples of DS statements are 


shown 

below: 


1 1 


(Name 

j.- 

(ONE 

|operation}Operand 

iDS 

}CL80(one 80-byte field* 

1 

1 

J length attribute of 80 

(TWO 

j DS 

|80C(80 one-byte fields* 

1 

1 

j length attribute of one 

(THREE|DS 

|6F(six full words, length 

1 

1 

| attribute of four) 

|FOUR 

(DS 

|D(one double word, length 

1 

1 

| attribute of eight) 

j FIVE 

|DS 

(4H(four half-words. 

1 

1 

( length attribute of 

j 

1 

} two) 


Note : A DS statement causes the storage 
area to be reserved but not set to zeros. 
No assumption should be made as to the 
contents of the reserved area. 


Special Uses of the Duplication Factor 


FORCING ALIGNMENT: The Location Counter 
can be forced to a double-word, full-word, 
or half-word boundary by using the 
appropriate field type (e.g., D, F, or H) 
with a duplication factor of zero. This 
method may be used to obtain boundary 
alignment that otherwise would not be pro¬ 
vided. For example, the following state¬ 
ments would set the Location Counter to the 
next double-word boundary and then reserve 
storage space for a 128-byte field (whose 
leftmost byte would be on a double-word 
boundary). 
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{Name |Operation {Operand | 

f~ Ids |od "I 

(area |ds |cli 28 j 


DEFINING FIELDS OF AW AREA: A DS instruc¬ 
tion with a duplication factor of zero can 
be used to assign a name to an area of 
storage without actually reserving the 
area. Additional DS and/or DC instructions 
may then be used to reserve the area and 
assign names to fields within the area (and 
generate constants if DC is used). 


For example, assume that 80-character 
records are to be read into an area for 
processing and that each record has the 
following format: 


Positions 5-10 
Positions 11-30 
Positions 31-36 
Positions 47-54 
Positions 55-62 


Payroll Number 
Employee Name 
Date 

Gross Wages 
Withholding Tax 


The following example illustrates how DS 
instructions might be used to assign a name 
to the record area, then define the fields 
of the area and allocate the storage for 
them. Note that the first statement names 
the entire area by defining the symbol 
RDAREA; the statement gives RDAREA a length 
attribute of 80 bytes, but does not reserve 
any storage. Similarly, the fifth state¬ 
ment names a 6-byte area by defining the 
symbol DATE; the three subsequent state¬ 
ments actually define the fields of DATE 
and allocate storage for them. The second, 
ninth, and last statements are used for 
spacing purposes and, therefore, are not 
named. 


CCW — DEFINE CHANNEL COMMAND WORD 


The CCW instruction provides a convenient 
way to define and generate an eight-byte 
Channel Command Word aligned at a double- 
word boundary. The internal machine format 
of a Channel Command Word is shown in Table 
5-1. CCW will cause any bytes skipped to 
be zeroed. The typical form of the CCW 
instruction statement is: 


j Name j Operation|Operand | 


I- - 

(A symbol 

(CCW 

(Four operands. 

H 

(or not 

( 

(separated by commas. 


jused 

1 

(specifying the con- 


I 

1 

(tents of the channel 


1 

1 

(command word in 


1 

1 

|the format 


1 

1 

(described in the 


1 

1 

(following text 

.j 


All four operands must appear. They are 
written, from left to right, as follows: 

1. An absolute expression that specifies 
the command code. This expression's 
value is right-justified in byte 1. 

2. An expression specifying the data 
address. The value of this expression 
is in bytes 2-4. 

3. An absolute expression that specifies 
the flags for bits 32-36 and zeros for 
bits 37-39. The value of this expres¬ 
sion is right-justified in byte 5. 
(Byte 6 is set to zero.) 

4. An absolute expression that specifies 
the count. The value of this expres¬ 
sion is right-justified in bytes 7-8. 

The following is an example of a CCW 
statement: 


I-T-T-1 

{Name (Operation (Operand | 


1- 

-+- 

--1- 

-^ 

(RDAREA 

(DS 

|0CL80 


1 

|DS 

j CL4 


|PAYNO 

(DS 

|CL6 


(NAME 

(DS 

JCL20 


(DATE 

(DS 

|0CL6 


(DAY 

|DS 

| CL2 


(MONTH 

(DS 

|CL2 


(YEAR 

Ids 

(CL2 


1 

(DS 

(CLIO 


(GROSS 

(DS 

(CL8 


JFEDTAX 

|DS 

j CL8 


1 

|DS 

(CL18 


l - 

L __ 

_jL___ 



|Name |Operation |Operand | 

| |CCW 12,READAREA,X* 48 *,80 ] 

I-J.-L-J 


Note that the form of the third operand 
sets bits 37-39 to zero, as required. The 
bit pattern of this operand is as follows: 

32-35 36-39 

0100 1000 

If there is a symbol in the name entry 
of the CCW instruction, it is assigned the 
address value of the leftmost byte of the 
channel command word. The length attribute 
of the symbol is eight. 
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Table 5-1. Channel Command Word 

r - -r—-- t---1 

]Byte j Bits j Usage j 


h— 
]1 

-h 

1 

0-7 

-T- 

I 

Command code 

-, 

| 2-4 

1 

8-31 

1 

Data address 


| 5 

1 

32-36 

1 

Flags 


1 

1 

37-39 

1 

Must be zero 


|6 

1 

40-47 

1 

Set to zero 


17-8 

1 

48-63 

1 

Count 


l_ 

-X- 


.X. 


-j 


LISTING CONTROL INSTRUCTIONS 


The listing control instructions are used 
to identify an assembly listing and assem¬ 
bly output cards, to provide blank lines in 
an assembly listing, and to designate how 
much detail is to be included in an assem¬ 
bly listing. In no case are instructions 
or constants generated in the object pro¬ 
gram. Listing control statements except 
PRINT are never printed. 


However, both ampersands and apostrophes 
are printed and are counted in the total 
number of operand characters. The contents 
of the name and operand field are printed 
at the top of each page of the assembly 
listing. 


A program may contain more than one 
TITLE statement. Each TITLE statement 
provides the heading for pages in the 
assembly listing that follow it, until 
another TITLE statement is encountered. 

Each TITLE statement encountered after the 
first one causes the listing to be advanced 
to a new page (before the heading is 
printed). 

For example, if the following statement 
is the first TITLE statement to appear in a 
program: 


r- t -r--—--1 

| Name |Operation |Operand j 

It -i- f --| 

J PGM | TITLE 1* FIRST HEADING* | 

L -JL-J-J 


TITLE — IDENTIFY ASSEMBLY OUTPUT 


The TITLE instruction enables the program¬ 
mer to identify the assembly listing and 
assembly output cards. The typical form of 
the TITLE instruction statement is as fol¬ 
lows : 


Name 

~r -- 

|Operation 

_ |.. 

•—r--- - 

|Operand 

4 


Name 

or 

j TITLE 

1 

T 

jOne to 100 char- 
j acters, enclosed 

in 

Not 

1 

|single apostrophes 

used 

1 

. i ... .. _ 

1 

- x __ _ 


The 

name entry 

nay contain a name 

of 


from one to four alphabetic or numeric 
characters in any combination. The con¬ 
tents of the name entry are punched into 
columns 73-76 of all the output cards for 
the program except those produced by the 
PUNCH and REPRO assembler instructions. 

Only the first TITLE statement in a program 
may have a name in the name entry. The 
name field of all subsequent TITLE state¬ 
ments must be blank. 

The operand field may contain up to 100 
characters enclosed in apostrophes. Any 
ampersands or apostrophes enclosed within 
the surrounding apostrophes must be rep¬ 
resented by two ampersands or apostrophes. 


then PGM1 is punched into all of the output 
cards (columns 73-76) and this heading 
appears at the top of each page: FIRST 
HEADING. 

If the following statement occurs later 
in the same program: 


r - T - T -T 

|Name JOperation jOperand j 

j.--j--+-1 

j |TITLE J *A NEW HEADING* | 

L-J-X-J 


then, PGML is still punched into the output 
cards, but each following page begins with 
the heading: A NEW HEADING. 

Note : The sequence number of the cards 

in the output deck is contained in columns 
77-80, except those produced by the PUNCH 
and REPRO assembler instructions. 


EJECT — START NEW PAGE 


The EJECT instruction causes the next line 
of the listing to appear at the top of a 
new page. This instruction provides a 
convenient way to separate routines in the 
program listing. The typical form of the 
EJECT instruction statement is as follows: 
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r- t- 

|Name |Operation 

I--+- 

jNot |EJECT 

J used j 

L_X_ 


JOperand 

+-- 

J Not used; should 
j be blank 
x _ 


I 

■I 

I 

I 


If the next line of the listing would 
appear at the top of a new page without the 
EJECT instruction, the EJECT instruction 
has no immediate effect. If one or more 
EJECT statements appear after the first 
EJECT, one or more pages are skipped. A 
TITLE instruction followed immediately by 
an EJECT instruction will result in a page 
with a title line and a statement heading 
line. Text following the EJECT instruction 
will begin at the top of the next page. 


SPACE — SPACE LISTING 


The SPACE instruction is used to insert one 
or more blank lines in the listing. The 
typical form of the SPACE instruction 
statement is as follows: 


r- t-t-1 

{Name |Operation JOperand j 

K-f-+--f 

|Not |SPACE |A decimal value J 

|used j Jor not used j 

L_J._J_J 


A decimal value is used to specify the 
number of blank lines to be inserted in the 
assembly listing. A blank operand causes 
one blank line to be inserted. If this 
value exceeds the number of lines remaining 
on the listing page, the statement will 
have the same effect as an EJECT statement. 


One to three of the following operands 
are used: 


ON 

or 

OFF 

GEN 

or 

NOGEN 


DATA 

or 

NODATA 


A listing is printed. 

No listing is printed. 

All statements generated by 
macro-instructions are printed. 

Statements generated by macro¬ 
instructions are not printed, 
except MNOTE messages (with a 
severity code other than *) 
which print regardless of NOGEN. 
However, the outer macro¬ 
instruction itself will appear 
in the listing. 

Constants are printed out in 
full in the listing. 

Only the leftmost eight bytes 
(16 hexadecimal digits) are 
printed. 


A program may contain any number of 
PRINT statements. The conditions set by a 
PRINT statement are in effect until another 
PRINT statement is encountered. 


If an operand is omitted, it is assumed 
to be unchanged and continues according to 
its last specification. 

When OFF is specified, GEN and DATA have 
no effect. When NOGEN is specified, DATA 
has no effect for generated constants. 

Until the first PRINT statement (if any) 
is encountered, the following is assumed: 


i- t -r- ^ 

|Name [Operation [Operand | 

*- + -+--J 

j [PRINT [ON,NODATA,GEN j 

l_ X -L-J 


For example, if the statement: 


PRINT — PRINT OPTIONAL DATA 


The PRINT instruction controls the content 
of the assembly listing. The typical form 
of the PRINT instruction is: 


| Name 

^- 

[Not 
j used 


_r- T -1 

J Operation j Operand J 

-+-f--f 

[PRINT [One to three operands) 

I I I 

-x_x-1 


r- ~t-t—--1 

| Name [Operation {Operand | 

j-1-1-J 

1 |dc [xl256 , oo* 1 

L-J-X-J 


appears in a program, 256 bytes of zeros 
are assembled. If the statement: 


)Name [Operation |Operand j 

*-1-+---1 

j [PRINT [DATA j 

L_X-J_J 
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is the last PRINT statement to appear 
before the DC statement, all 256 bytes of 
zeros are printed in the assembly listing. 
However, if there are no previous PRINT 
statements, or: 


|Name jOperation {Operand j 

[ |PRINT |NODATA | 


is the last PRINT statement to appear 
before the DC statement, only eight bytes 
of zeros are printed in the assembly list¬ 
ing. 


PROGRAM CONTROL INSTRUCTIONS 


The program control instructions are used 
to specify the end of an assembly, to set 
the Location Counter to a value or halfword 
boundary, to insert previously written 
coding in the program, to specify the 
placement of literals in storage, to check 
the sequence of input cards, to indicate 
statement format, and to punch a card. 
Except for the CNOP and COPY instructions, 
none of these assembler instructions gener¬ 
ate instructions or constants in the object 
program. 


ICTL — INPUT FORMAT CONTROL 


used to indicate whether the next card is a 
continuation card. Operand c specifies the 
continue column of the source statement. 

The continue column, when specified, must 
be from 2-40 and must be greater than b. 

If the continue column is not specified, or 
if column 80 is specified as the end 
column, the assembler assumes that there 
are no continuation cards, and all state¬ 
ments must be contained on a single card. 
Th-e operand forms b, ,c and b, are invalid. 

If no ICTL statement is used in the 
source program, the assembler assumes that 
1, 71, and 16 are the begin, end, and con¬ 
tinue columns, respectively. 

The next example designates the begin 
column as column 25. Since the end column 
is not specified, it is assumed to be 
column 71. No continuation cards are rec¬ 
ognized because the continue column is not 
specified. 


(Name {Operation {Operand | 

{ {ICTL |25 1 

l -i--L-J 


ISEQ — INPUT SEQUENCE CHECKING 


The ISeQ instruction is used to check the 
sequence of input cards. The typical form 
of the ISEQ instruction statement is as 
follows: 


The ICTL instruction allows the programmer 
to alter the normal format of his source 
program statements- The ICTL statement 
must precede all other statements in the 
source program and may be used only once. 
The form of the ICTL instruction statement 
is as follows: 


{Name J Operation J Operand | 

| Not used, J ICTL { 1-3 decimal | 

j must not j j values of the j 

jbe present | | form b,e,c j 


Operand b specifies the begin column of 
the source statement. It must always be 
specified, and must be from 1-40, inclu¬ 
sive. Operand e specifies the end column 
of the source statement- The end column, 
when specified, must be from 41-80, inclu¬ 
sive; when not specified, it is assumed to 
be 71. The column after the end column is 


{Name { Operation { Operand { 

{Not used, j ISEQ j Two decimal j 

{must not j J values of the j 

jbe present | j form l,r, or j 


{ | { not used j 


The operands 1 and r, respectively, 
specify the leftmost and rightmost columns 
of the field in the input cards to be 
checked. Operand r must be equal to or 
greater than operand 1. Columns to be 
checked must not be between the "begin" and 
"end" columns. 

Sequence checking begins with the first 
card following the ISEQ statement, compar¬ 
ison of adjacent cards makes use of the 
eight-bit internal collating sequence. 

Each card checked must be higher than the 
preceding one. 
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An ISEQ statement with a blank operand 
terminates the operation. Checking may be 
resumed with another ISEQ statement. 


Sequence checking is only performed on 
statements contained in the source program. 
Statements inserted by the COPY 
assembler-instruction or generated by a 
macro-instruction are not checked for 
sequence. 


PUNCH — PUNCH A CARD 


The PUNCH assembler-instruction causes the 
data in the operand to be punched into a 
card. One PUNCH statement produces one 
punched card. As many PUNCH statements may 
be used as are necessary. The typical form 
is: 


(Name jOperation |Operand | 

|Not |PUNCH |1 to 80 characters I 
j used j j enclosed in j 
j j (apostrophes j 


Using character representation, the 
operand is written as a string of up to 80 
characters enclosed in apostrophes . All 
characters, including blank, are valid. 

The position immediately to the right of 
the left apostrophe is regarded as column 
one of the card to be punched. The assem¬ 
bly program does not process the data in 
the operand of a PUNCH statement other than 
causing it to be punched in a card. For 
each apostrophe or ampersand desired in the 
operand, two apostrophes or ampersands must 
be written. The two apostrophes or amper¬ 
sands are reduced to a single apostrophe or 
ampersand. However, they count as only one 
character in the operand. 

PUNCH statements may occur anywhere 
within a program, except before macro¬ 
definitions. They may occur within a 
macro-definition but not between a MEND 
statement and the beginning of the next 
macro. If a PUNCH statement occurs before 
the first control section, the resultant 
card will precede all other cards in the 
object program card deck; otherwise the 
card will be punched in place. No sequence 
number or identification is punched in the 
card. 


REPRO — REPRODUCE FOLLOWING CARD 


The REPRO assembler-instruction causes data 
on the following statement line to be 
punched into a card. The data is not proc¬ 
essed; it is punched in a card and no sub¬ 
stitution is performed for variable sym¬ 
bols. No sequence number or identification 
is punched in the card. One REPRO instruc¬ 
tion produces one punched card. The REPRO 
instruction may not appear before a macro¬ 
definition. 

REPRO statements that occur before all 
statements composing the first or only 
control section will punch cards which 
precede all cards of the object deck. The 
form is: 


|Name (Operation (Operand | 

(Not (REPRO (Not used, should } 

j used J (not be present j 


The line to be reproduced may contain 
any combination of up to 80 characters. 
Characters may be entered starting in 
column 1 and continue through column 80 of 
the line, column 1 of the line corresponds 
to column 1 of the card to be punched. 


ORG — SET LOCATION COUNTER 


The ORG instruction is used to alter the 
setting of the Location Counter for the 
current control section. The typical form 
of the ORG instruction statement is: 


(Name (Operation (Operand | 

|Not (ORG (A relocatable ex- j 

(used ( (pression or not used j 


Any symbols in the expression must have 
been previously defined- The unpaired 
relocatable symbol must be defined in the 
same control section in which the ORG 
statement appears. 

The Location Counter is set to the value 
of the expression in the operand. If the 
operand is omitted, the Location Counter is 
set to a location that is one byte higher 
than the maximum location assigned for the 
control section up to this point. 
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Special Addressing Consideration 


An ORG statement must not be used to 
specify a location below the beginning of 
the control section in which it appears. 
For example, the statementi 


r- t-t-t 

|Name |operation |Operand | 

\ |ORG | *-500 1 


is invalid if it appears less than 500 
bytes from the beginning of the current 
control section. 

If it is desired to reset the Location 
Counter to the next available location in 
the current control section, the following 
statement would be used: 


Any literals used after the last LTORG 
statement in a program are placed at the 
end of the first control section. If there 
are no LTORG statements in a program, all 
literals used in the program are placed at 
the end of the first control section. In 
these circumstances the programmer must 
ensure that the first control section is 
always addressable. This means that the 
base address register for the first control 
section should not be changed through usage 
in subsequent control sections. If the 
programmer does not wish to reserve a reg¬ 
ister for this purpose, he may place a 
LTORG statement at the end of each control 
section, thereby ensuring that all literals 
appearing in that section are addressable. 


| Name 

i_ 

|Operation (Operand 

j 

r 

1 

L_ 

| ORG ( 

j 

If 

previous ORG statements 

have reduced 


the Location Counter for the purpose of 
redefining a portion of the current control 
section, an ORG statement with an omitted 
operand can then be used to terminate the 
effects of such statements and restore the 
Location counter to its highest setting. 


LTORG — BEGIN LITERAL POOL 


The LTORG instruction causes all literals 
since the previous LTORG or beginning of 
the program to be assembled at appropriate 
boundaries starting at the first double- 
word boundary following the LTORG 
statement. If no literals follow the LTORG 
statement, alignment of the next instruc¬ 
tion will occur. Bytes skipped are not 
zeroed. The typical form of the LTORG 
instruction statement is: 


(Name |Operation (Operand | 

|A symbol|LTORG jNot used, should 1 
jor not j |not be present 1 
I used j | j 


i_ 




_j 


CNOP — CONDITIONAL NO OPERATION 


The CNOP instruction allows the programmer 
to align an instruction at a specific word 
boundary. If any bytes must be skipped in 
order to align the instruction properly, 
the assembler insures an unbroken instruc¬ 
tion flow by generating no-operation 
instructions. This facility is useful in 
creating calling sequences consisting of a 
linkage to a subroutine followed by parame¬ 
ters such as channel command words (CCW). 

The CNOP instruction insures the align¬ 
ment of the Location Counter setting to a 
half-word, word, or double-word boundary. 

If the Location counter is already properly 
aligned, the CNOP instruction has no 
effect. If the specified alignment 
requires the Location counter to be incre¬ 
mented, one to three no-operation instruc¬ 
tions are generated, each of which uses two 
bytes. 

The typical form of the CNOP instruction 
statement is as follows: 


(Name (Operation |Operand 

(Not (CNOP |Two absolute 

(used j (expressions of 

j j |the form b,w 

I- X - X - 


-1 


—1 


J 


Any symbols used in the expressions in 
the operand field must have been previously 
defined. 


The symbol represents the address of the 
first byte of the literal pool. It has a 
length attribute of one. 


Operand b specifies at which byte in a 
word or double word the Location Counter is 
to be set; b can be 0, 2, 4, or 6. Operand 
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| Double Word | 

|~ Word | Word 'j 

j.- 1 --)-t-^ 

| Half word j Half word | Half word j Half word j 

-j--j- r - i -t- -I - r - 

| Byte | Byte | Byte | Byte | Byte | Byte | Byte | Byte| 

J-a-J-l-a -1-j-A-^ 

I I 

|0,4 2,4 0,4 2,4 | 

10,8 2,8 4,8 6,8 1 

I_J 

Figure 5-2. CNOP Alignment 


w specifies whether byte b is in a word 
(w=4) or double word (w=8). The following 
pairs of b and w are valid: 


{Name {Operation |Operand 

j-1-+-*— 

j j BCR 1 0,0 

I |BCR | 0,0 

j j BCR |0,0 

1 j BALR I 2,14 




I 

•I 




b, w 

Specifies 


0,4 

Beginning of a word 


2,4 

Middle of a word 


0,8 

Beginning of a double 

word 

2,8 

Second half word of a 

double word 

4,8 

Middle (third half word) of a dou¬ 
ble word 

6,8 

Fourth half word of a 

double word 


Figure 5-2 shows the position in a dou¬ 
ble word that each of these pairs speci¬ 
fies. Note that both 0,4 and 2,4 specify 
two locations in a double word. 


After the BALR instruction is generated, 
the Location Counter is at a double-word 
boundary, thereby insuring an unbroken 
instruction flow. 

Note : If the location counter is on an 
odd-numbered byte-boundary when a CNOP 
instruction is encountered, normal align¬ 
ment occurs before the CNOP is processed. 


Assume that the Location Counter is 
currently aligned at a double-word bounda¬ 
ry. Then the CNOP instruction in this 
sequence: 



|Opera tion j Operand 

|CNOP J0,8 

j BALR 12,14 



has no effect. However, this sequence: 


COPY — COPY PREDEFINED SOURCE CODING 


The COPY instruction obtains source- 
language coding from a system library 
(Assembler source statement library) and 
includes it in the program currently being 
assembled. The form of the COPY 
instruction statement is as follows: 


[Name 1 Operation | Operand 1 

| Not used, | COPY | One symbol | 

jroust not | j j 

| be present | j j 


j 


|Name 1Operation |Operand | 

|-4-4- 1 The operand is a symbol that identifies 

| j CNOP 16,8 j the section of coding to be copied. The 

I j BALR j 2,14 j symbol must not be the same as the mnemonic 


-a-j operation code of a definition in the macro 

library. 


causes three branch-on-conditions 
(no-operations) to be generated, thus 
aligning the BALR instruction at the last 
half-word in a double word as follows: 


The assembler inserts the requested 
coding immediately after the COPY statement 
is encountered. The requested coding may 
not contain another COPY statement. 
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If identical COPY statements are encoun¬ 
tered, the coding they request is brought 
into the program each time. 

COPYed text is always in the normal 
format and is not governed by ICTL usage. 
See Copy Statements in Section 7 for furth¬ 
er information. The procedure for placing 
source language coding in the system 
library is described in the system control 
and system service programs publication 
listed in the Preface. 


END — END ASSEMBLY 


The END instruction terminates the assembly 
of a program. It may also designate a 
point in the program or in a separately 
assembled program to which control may be 
transferred after the program is loaded. 

The END instruction must always be the last 
statement in the source program. 


The typical form of the END instruction 
statement is as follows: 


(Name } Operation | Operand | 

j A sequence j END j A relocatable j 
jsymbol or j j expression or j 
jnot present} j not present j 
i_J_i-J 


The operand specifies the point to which 
control may be transferred when loading is 
complete. For example: 


|Name 

| Operation 

jCSECT 

— r - _ 

|Operand 


1 

-4 

j_ 

Jname 

1 


} AREA 

}DS 

| 50F 



jBEGIN 

j BALR 

12,0 




j USING 

1 - 
l 

1**2 

1 

i 




1 * 

1 • 

| END 

1 

I 

|BEGIN 



|__ 

_^__ ___^ 

_1___—_____ 

____ 

_J 


NOTE: If macro-instructions are included 

in an assembly, errors detected during 
macro editing will be printed after the END 
statement and will be flagged. The error 
messages do not follow the macro-instruc¬ 
tions , because the source statements are 
not available to the assembler during macro 
editing. 
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PART 3 — CONDITIONAL ASSEMBLY AND MACRO FACILITIES IN THE ASSEMBLER LANGUAGE 


SECTION 6: INTRODUCTION TO THE MACRO 
FACILITIES 


The DOS/TOS conditional assembly and macro 
facilities are part of the DOS/TOS assem¬ 
bler language. 

Conditional assembly allows one to spec¬ 
ify assembler language statements which may 
or may not be assembled, depending upon 
conditions evaluated at assembly time. 
Conditional assembly statements are used to 
define, set, change, and test values during 
the course of the assembly itself. 

The conditional assembly instructions 
may be used to vary the sequence of state¬ 
ments generated for each occurrence of a 
macro-instruction. Conditional assembly 
instructions may also be used outside 
macro-definitions, i.e., among the assem¬ 
bler language statements in the program. 

The macro facilities provide the pro¬ 
grammer with a convenient way to write a 
macro-definition that can be used to gener¬ 
ate a desired sequence of machine instruc¬ 
tions and certain assembler instructions 
many times in one or more programs. 

This macro-definition is written only 
once, and a single statement, a macro¬ 
instruction statement, is written each time 
a programmer wants to generate the desired 
sequence of statements. 

This facility simplifies the coding of 
programs, reduces the chance of programming 
errors, and ensures that standard sequences 
of statements are used to accomplish 
desired functions. 


THE MACRO- INSTRUCTION STATEMENT 


A macro-instruction statement (also called 
a macro-instruction) is a source program 
statement used to provide information for 
generating machine and assembler instruc¬ 
tions from a macro-definition. The gener¬ 
ated instructions are source statements 
which are then processed by the assembler 
program. 

Three types of macro-instructions may be 
written. Each type has a different form of 
operand. They are: 


1. Positional ( Sections 7 and 8). 

2. Keyword ( Section 10 ). 

3. Mixed-mode ( Section 10 ). 

Positional macro-instruction operands 
are written in a fixed order. 

Keyword macro-instruction operands can 
be written in any order. 

Mixed-mode macro-instruction operands 
are a combination of both positional and 
keyword operands. That is, certain operand 
entries (positional) must be written in a 
fixed order; other operand entries 
(keyword) can be specified in any order. 


THE MACRO-DEFINITION 


Before a macro-instruction can be assem¬ 
bled, a macro-definition must be available 
to the assembler. 

A macro-definition is a set of state¬ 
ments that provide the assembler with: 

1. The name entry, mnemonic operation 
code, and the form of the macro¬ 
instruction operand, and 

2. The sequence of statements the 
assembler uses when the macro¬ 
instruction appears in the source 
program. 

Every macro-definition consists of a 
macro-definition header statement, a macro¬ 
instruction prototype statement, a sequence 
of model statements, COPY statements, 

MEXIT, MNOTE, or conditional assembly 
instructions, and a macro-definition trail¬ 
er statement. 

The macro-definition header and trailer 
statements denote the beginning and end, 
respectively, of a macro-definition. 

The macro-instruction prototype state¬ 
ment specifies the name entry, mnemonic 
operation code, and the type of the macro¬ 
instruction operand. 

The model statements contained in a 
macro-definition may be used by the 
assembler to generate machine instructions 
and certain assembler instructions that 
replace each occurrence of the macro¬ 
instruction. 
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The COPY statements may be used to copy 
model statements, MEXIT instructions, MNOTE 
instructions, and conditional assembly 
instructions from a system library 
(Assembler source statement library) into a 
macro-definition. 

The MEXIT instruction can be used to 
terminate processing of a macro-definition. 

The MNOTE instruction can be used to 
generate a message. 

The conditional assembly instructions 
may be used to vary the sequence of 
statements generated for each occurrence of 
a macro instruction, conditional assembly 
instructions may also be used outside 
macro-definitions, i.e., among the assem¬ 
bler language statements in the program. 

If a macro-definition is in-line-with an 
assembly, it is called a programmer macro. 


THE ASSEMBLER SOURCE STATEMENT LIBRARY 

The same macro-definition may be made avail¬ 
able to more than one source program by 
placing the macro-definition in the assem¬ 
bler source statement library. The macro¬ 
definition then becomes a system macro. 

This system library is a collection of macro¬ 
definitions that can be used by all the 
assembler language programs in an installa¬ 
tion. Once a macro-definition has been 
placed in the source statement library it 
may be used by writing a corresponding 
macro-instruction in a source program. 
Macro-definitions must be in the assembler 
source statement library under the same 
name as the prototype. The procedure for 
placing macro-definitions in the source 
statement library is described in the Sys¬ 
tem Control and System Service Programs 
publication listed in the Preface . 

System macro instructions provided by 
IBM, are described in the Supervisor and 
Input/Output Macros publication, also 
listed in the Preface. 

Editing errors in user-supplied system 
macros are found at the time the macro is 
read from the source statement library, 
i.e., after the END card. To determine 
where these errors are, it is necessary to 
punch all such macros, including inner 
macros, and insert them then in the source 
program as programmer macros. To aid in 
debugging it is advisable to run all macros 
as programmer macros before incorporating 
them as system macros. 

VARYING THE GENERATED STATEMENTS 

Each time a macro instruction appears in 
the source program, it is replaced by the 


same sequence of assembler language state¬ 
ments. conditional assembly instructions, 
however, may be used to vary the number and 
format of the generated statements. 


VARIABLE SYMBOLS 


A variable symbol is a type of symbol that 
is assigned various values by either the 
programmer or the assembler. Thus, varia¬ 
ble symbols allow different values to be 
assigned to one symbol. When the assembler 
uses a macro-definition to determine what 
statements are to replace a macro¬ 
instruction, variable symbols in the model 
statements are replaced with the current 
values assigned to them. 

A variable symbol is written as an 
ampersand followed by from one to seven 
letters and/or digits, the first of which 
must be a letter. 


Types of Variable Symbols 


There are three types of variable symbols: 
symbolic parameters, system variable sym¬ 
bols, and SET symbols. The SET symbols are 
further broken down into SETA symbols, SETB 
symbols, and SETC symbols. The three types 
of variable symbols differ in how they are 
assigned values. 


Assigning Values to Variable Symbols 


Symbolic parameters are assigned values by 
the programmer each time he writes a macro¬ 
instruction. 

System variable symbols are assigned 
values by the assembler each time it proc¬ 
esses a macro-instruction. 

SET symbols are assigned values by the 
programmer by means of conditional assembly 
instructions. 

Global SET Symbols 


The values assigned to SET symbols in one 
macro-definition may be used in other 
macro-definitions. All SET symbols used 
for this purpose must be defined as global 
SET symbols. All other SET symbols must be 
defined by the programmer as local SET 
symbols. Local SET symbols and the other 
variable symbols (that is, symbolic param¬ 
eters and system variable symbols) are 
local variable symbols. Global SET symbols 
are global variable symbols. 
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ORGANIZATION OF THIS PART OF THE 
PUBLICATION 


Sections 7 and 8 describe the basic rules 
for preparing macro-definitions and for 
writing macro-instructions. 

Section 9 describes the rules for writ¬ 
ing conditional assembly instructions- 

Section 10 describes additional features 
including rules for defining global SET 


symbols, preparing keyword and mixed-mode 
macro-definitions, and writing keyword and 
mixed-mode macro-instructions. 

Appendix G contains a reference summary 
of the complete macro facilities. 

Examples of the use of the features of 
the language appear throughout the remain¬ 
der of the publication. These examples 
illustrate the use of particular features. 
However, they are not meant to show the 
full versatility of these features. 
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SECTION 7: HOW TO PREPARE MACRO-DEFINITIONS 


A macro-definition consists of: 

1. A macro-definition header statement. 

2. A macro-instruction prototype state¬ 
ment. 

3. Zero or more model statements, COPY 
statements, MEXIT, MNOTE, or condi¬ 
tional assembly instructions. 

4. A macro-definition trailer statement. 

Except for MEXIT, MNOTE, and conditional 
assembly instructions, this section of the 
publication describes the statements that 
may be used to prepare macro-definitions. 
Conditional assembly instructions are des¬ 
cribed in Section 9 . MEXIT and MNOTE 
instructions are described in Section 10 . 

Macro-definitions in a source program 
must appear before all PUNCH and REPRO 
statements which appear in the main pro¬ 
gram. Specifically, only the listing con¬ 
trol instructions (EJECT, PRINT, SPACE, and 
TITLE), ICTL and ISEQ instructions, and 
comments statements may occur before the 
macro-definitions. All but the ICTL 
instruction nay appear between macro¬ 
definitions if there is more than one 
definition in the source program. 


MACRO — MACRO-DEFINITION HEADER 


definition. The form of this statement is: 

|Name |Operation |Operand | 

|Not |MEND |Not used, must not | 

jused | |be present | 


MACRO-INSTRUCTION PROTOTYPE 


The macro-instruction prototype statement 
(also called the prototype statement) 
specifies the name entry, mnemonic opera¬ 
tion code, and the form of all macro¬ 
instructions that refer to the macro¬ 
definition. It must be the second state¬ 
ment of every macro-definition. The 
typical form of this statement is: 


r-r-r-1 

|Name |Operation {Operand | 

I--4- 4 --I 

| A symbolic |A symbol |Zero to 100 sym- | 

{parameter j jbolic parameters,! 

|or not { J separated by com-J 

I used | ]mas | 


The macro-definition header statement 
denotes the beginning of a macro¬ 
definition. It must be the first statement 
in every macro-definition. The form of 
this statement is: 


r- t-t-1 

| Name { Operation { Operand J 

* - + - f - * 

{Not used, J MACRO | Not used, must | 

{must not j | not be present { 

I be present | | j 

L-X_ L -1 


MEND — MACRO-DEFINITION TRAILER 


The macro-definition trailer statement 
denotes the end of a macro-definition. It 
must be the last statement in every macro- 


The symbolic parameters are used in the 
macro-definition to represent the name 
entry and operands of the corresponding 
macro-instruction. A description of sym¬ 
bolic parameters appears following Model 
Statements. 


The name entry of the prototype state¬ 
ment may be unused or it may contain a 
symbolic parameter- 

The symbol in the operation entry is the 
mnemonic operation code that must appear in 
all macro-instructions that refer to this 
macro-definition. The mnemonic operation 
code must not be the same as the mnemonic 
operation code of another macro-definition 
in the source program or of a machine 
instruction or assembler instruction. 

The operand entry may contain zero to 
100 symbolic parameters separated by com¬ 
mas. 
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The following is a prototype statement. 


r- T - T ---1 

|Name |Operation jOperand | 

V - f -+-1 

|6NAME |MOVE |6TO,SFROM j 

L-A_A-1 


Alternate Statement Form 


The prototype statement may be written in a 
form different from that used for machine 
or assemoler instructions. The normal form 
is described in Part 1 of this publication. 
The alternate form described here allows 
the programmer to write an operand on each 
line, and allows the interspersing of oper¬ 
ands and comments in the statement. 


In the alternate form, as in the normal 
form, the name and operation entries must 
appear on the first line of the statement, 
and at least on; blank must follow the 
operation entry on that line. Both types 
of statement forms may be used in the same 
prototype statement. 


The rules for using the alternate state¬ 
ment form are: 


1. If an operand is followed by a comma 
and a blank, and the column after the 
erd column contains a nonblank charac¬ 
ter, the operand entry may be contin¬ 
ued on the next line starting in the 
continue column. More than one oper¬ 
and may appear on the same line. 

2. Comments may appear after the blank 
that indicates the end of an operand, 
up to and including the end column. 

3. If the next line starts after the 
continue column, the information 
entered on that line is considered to 
be comments, and the operand field is 
considered terminated. Any subsequent 
continuation lines are considered to 
contain only comments. 


Note ; A prototype statement may be 
written on as many continuation lines as is 
necessary to contain 100 operands and asso¬ 
ciated comments. 

The following examples illustrate: (1) 
the normal statement form, (2) the alter¬ 
nate statement form, and (3) the combina¬ 
tion of both statement forms. 


Name 

r-r— — - 

|Oper-|Operand 
j ation j 

A A 

— _ T 

Comments| | 

1 1 

5D2,OPERAN| X| 
FORM | j 

A J 

NAMEl 

jopi 

J 

j 0PERAND1,OPERAt 
|D3 THE NORMAL 

A 

NAME2 

j OP 2 

1 

1 

1 

__ 

| 0PERAND1, THIS IS THE AL|X| 
j OPERAND2,OPERAND3, TERNAj X | 

| TE STATEMENT |X| 

1 FORM J | 

| .... -_ _ . j j 

NAME 3 

j OP3 

1 

1 

1 

( OPERAND1, THIS IS A COMB‘|xj 
|OPERAND2,OPERAND3,OPERANj Xj 
|D4,OPERAND5 INATION OF { KI 
jBOTH STATEMENT FORMATS | J 


t-L-L-„-J_J 


MODEL STATEMENTS 


Model statements are the macro-definition 
statements from which the desired sequences 
of machine instructions and certain assem¬ 
bler instructions are generated. Zero or 
more model statements may follow the proto¬ 
type statement. A model statement consists 
of one to four entries. They are, from 
left to right, the name, operation, oper¬ 
and, and comments entries. 

The name entry may be unused, or it may 
contain an ordinary symbol, a sequence 
symbol or a variable symbol, depending on 
the particular statement. (Neither * nor 
.* may be substituted in the begin column 
of a model statement.) 

The operation entry may contain any 
machine, assembler, or macro instruction 
mnemonic operation code, except COPY, END, 
ICTL, ISEQ, and PRINT; or it may contain a 
variable symbol. Variable symbols may not 
be used to generate the following mnemonic 
operation codes, nor may variable symbols 
be used in the name and operand entries of 
these instructions: COPY, END, ICTL, or 
ISEQ. Variable symbols may not be used to 
generate CSECT, DSECT, PRINT, REPRO, START, 
MACRO, MEND, MEXIT, LCLA, LCLB, LCLC, GBLA, 
GBLB, GBLC, SETA, SETB, SETC, AIF, AIFB, 
AGO, AGOB, ANOP, or macro-instruction mne¬ 
monic operation codes. Variable symbols 
may not be used to generate the name and 
operation code of the ACTR instruction. 

Variable symbols may also be used out¬ 
side of macro-definitions to generate mne¬ 
monic operation codes with the preceding 
restrictions. 

Although COPY statements may not be used 
as model statements, they may be part of a 
macro-definition. The use of COPY state¬ 
ments is described under COPY statements. 
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The operand entry may contain ordinary 
symbols or variable symbols. After substi¬ 
tution, the operand nwst not be greater 
than 127 characters. Model statement 
fields must follow the rules for paired 
apostrophes, ampersands, and blanks, as 
macro-instruction operands. (See 

"Macro-Instruction Operands* in Section 8.) 
Sequence symbols must appear in the operand 
entry of AGO and AIF instructions. 

The comments entry may contain any 
combination of characters. Substitution by 
the use of variable symbols is not allowed. 

If a RePRO statement is used as a model 
statement, it must be explicitly written in 
the operation entry. It may not be gener¬ 
ated as a result of replacing a variable 
symbol by its value. Also, the line fol¬ 
lowing it may not contain variable symbols. 
Substituted statements may not have blanks 
in any fields except between paired apos¬ 
trophes. They may not have leading blanks 
in the name or operand fields. 


SYMBOLIC PARAMETERS 


A symbolic parameter is a type of variable 
symbol consisting of an ampersand followed 
by one to seven letters and/or numbers, the 
first of which must be a letter. Symbolic 
parameters appear in prototype and model 
statements. They are assigned values by 
the programmer when he writes a macro¬ 
instruction- The programmer may vary 
statements that are generated for each 
occurrence of a macro-instruction by vary¬ 
ing the values assigned to symbolic param¬ 
eters. 


6IN AREA (contains a special charac¬ 
ter, i.e., blank, other 
than initial ampersand) 


The following is an example of a macro¬ 
definition. Note that the symbolic 
parameters in the model statements appear 
in the prototype statement. 



| Name 

1 

T - 

|Operation 

| Operand 

-1- 

1 

- 1 

1 

-H 

Header 

|MACRO 

Prototype J 6NAME 
Model 6NAME 

j MOVE 
(ST 

|6TO,6FROM 
(2,SAVE 


Model 

1 

|I* 

|2,6FROM 


Model 

1 

( ST 

j 2,6TO 


Model 

I 

II* 

(2,SAVE 


Trailer 

1 

L _ 

(MEND 

1 

—L _ _ 

_j 


Symbolic parameters in model statements 
are replaced by the characters of the 
macro-instruction operand that correspond 
to the symbolic parameters. 

In the following example the characters 
HERE, FIELDA, and FIELDB of the MOVE macro- 
instruction correspond to the symbolic 
parameters 6NAME, 6TO, and 6FR0M, 
respectively, of the MOVE prototype state¬ 
ment. 


|Name (Operation |Operand | 

(HERE (MOVE |FIELDA,FIE ID B ( 


The programmer should not use 6SYS as 
the first four characters of a symbolic 
parameter. 

The following are valid symbolic param¬ 
eters: 

6READER 6LOOP2 

6A23456 6N 

6X4F2 6S4 


The following are invalid symbolic pa¬ 
rameters: 


CARDAREA 
6256b 

6AREA2456 
6BCD(34) 


(first character is not an 
ampersand) 

(first character after 
ampersand is not a 
letter) 

(more than seven characters 
after the ampersand) 
(contains a special charac¬ 
ter other than initial 
ampersand) 


Any occurrence of the symbolic parame¬ 
ters 6NAME, 6TO, and 6FR0M in a model 
statement will be replaced by the charac¬ 
ters HERE, FIELDA, and FIELDB, respective¬ 
ly. If the preceding macro-instruction was 
used in a source program, the following 
assembler language statements would be 
generated: 


f- T - 

|Name (Operation 
| HERE (ST 

I 11* 

I 1ST 

I 11* 


j Operand 

|2,SAVE 
|2,FIELDB 
|2,FIELDA 
(2,SAVE 
.X- 


I 

•1 


I 


I 


J 


The example below illustrates another 
use of the MOVE macro-instruction using 
different operands than those that appear 
in the preceding example. 
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J Name j Oper ation J Operand 


Macro | LABEL 

J MOVE 

! IN, OUT 

1 

Generated|LABEL 

J ST 

J 2,SAVE 

Generated! 

|L 

J 2, OUT 

Generated j 

| ST 

!2,IN 

Generated! 

! L 

j2,SAVE 


—l 


I 

■1 

I 

I 

I 

I 


If a symbolic parameter appears in the 
comments field of a model statement, it is 
not replaced by the corresponding charac¬ 
ters of the macro-instruction. 


Concatenating Symbolic Parameters with 
Other Characters or Other Symbolic 
Parameters 


Concatenation is the process of linking or 
joining together in a sequence, with a 
specified order. To concatenate is to join 
together in a specified order. 

If a symbolic parameter in a model 
statement is immediately preceded or fol¬ 
lowed by other characters or another sym¬ 
bolic parameter, the characters that cor¬ 
respond to the symbolic parameter are com¬ 
bined, in the order given, in the generated 
statement, with the other characters or the 
characters that correspond to the other 
symbolic parameter. This process is called 
concatenation. 

The macro-definition, macro-instruction, 
and generated statements in the following 
example illustrate these rules. 


|Name JOperation|Operand J 


Header | |MACRO 

Prototype j 6NAMEj MOVE 


Model 

Model 

Model 

Model 

Trailer 


6NAME!STSTY 
| |L6TY 

j j ST6TY 

j j L6TY 

| I MEND 


I 

j STY, 6P, 6TO, 6FROM 
j 2,SAVEAREA 
j 2,SP6FROM 
j 2,6P6TO 
j2,SAVEAREA 


Macro |HERE 

Generated!HERE 

4— 

|MOVE 

4- 

J STD 

|D,FIELD,A,B 

-H 

1 

-H 

1 

!2,SAVEAREA 

Generated! 

1 LD 

j 2,FIELDB 

1 

Generated! 

j STD 

j 2,FIELDA 

1 

Generated j 

|LD 

j2,SAVEAREA 

1 

L_ % _ 

„ ___1. . r . ___ 

—j 


The symbolic parameter STY is used in 
each of the four model statements to vary 
the mnemonic operation code of each of the 


generated statements. The character D in 
the macro-instruction corresponds to sym¬ 
bolic parameter STY. Since STY is preceded 
by other characters (i.e., ST and L) in the 
model statements, the character that cor¬ 
responds to STY (i.e., D) is concatenated 
with the other characters to form the oper¬ 
ation fields of the generated statements. 


The symbolic parameters 6P, 6TO, and 
SFROM are used in two of the model state¬ 
ments to vary part of the operand fields of 
the corresponding generated statements. 

The characters FIELD, A, and B correspond 
to the symbolic parameters 6P, 6TO, and 
SFROM, respectively. Since SP is followed 
by SFROM in the second model statement, the 
characters that correspond to them (i.e., 
FIELD and B) are concatenated to form part 
of the operand field of the second generat¬ 
ed statement. Similarly, FIELD and A are 
concatenated to form part of the operand 
field of the third generated statement. 


If the programmer wishes to concatenate 
a symbolic parameter with a letter, digit, 
left parenthesis, or period following the 
symbolic parameter he must immediately 
follow the symbolic parameter with a per¬ 
iod. A period is optional if the symbolic 
parameter is to be concatenated with anoth¬ 
er symbolic parameter, or a special charac¬ 
ter other than a left parenthesis or anoth¬ 
er period that follows it. 

If a symbolic parameter is immediately 
followed by a period, then the symbolic 
parameter and the period are repl&ced by 
the characters that correspond to the sym¬ 
bolic parameter. A period that immediately 
follows a symbolic parameter does not 
appear in the generated statement. 

The following macro-definition, macro¬ 
instruction, and generated statements 
illustrate these rules. 



J Name |Operation J Opera nd 

Header 

Prototype 

Model 

Model 

Model 

Model 

Trailer 

1 1 MACRO 

j 6NAMEj MOVE 
|€NAME|ST 

1 II* 

1 1ST 

1 1 1* 

j J MEND 

j _ j. 

T 

1 

J SP,6S,6R1,6R2 
j SRI,SS. (SR2) 
j SRI,6P.B 
|£R1,£P.A 
|6R1,6S.(6R2) 

1 

Macro 

]hERE j MOVE 

| __ 

(field,SAVE,2,4 


Generated 

Generated 

Generated 

Generated 


HERE 


|ST 

|L 

|ST 

1L 

.J.- 


| 2,SAVE(4) 
j 2,FIELDB 
j2,FIELDA 
j 2,SAVE(4) 
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The symbolic parameter SP is used in the 
second and third model statements to vary 
part of the operand field of each of the 
corresponding generated statements. The 
characters FIELD of the macro-instruction 
correspond to 6P. Since €P is to be conca¬ 
tenated with a letter (i.e., B and A) in 
each of the statements, a period immediate¬ 
ly follows &P in each of the model state¬ 
ments. The period does not appear in the 
generated statements. 

Similarly, symbolic parameter &S is used 
in the first and fourth model statements to 
vary the operand fields of the correspond¬ 
ing generated statements. 6S is followed 
by a period in each of the model state¬ 
ments, because it is to be concatenated 
with a left parenthesis. The period does 
not appear in the generated statements. 


Comments Statements 


A model statement may be a comments state¬ 
ment. A comments statement consists of an 
asterisk in the begin column, followed by 
comments. The comments statement is used 
by the assembler to generate an assembler 
language comments statement, just as other 
model statements are used by the assembler 
to generate assembler language statements. 

The programmer may also write comments 
statements in a macro-definition which are 
not to be generated. These statements must 
have a period in the begin column, immedi¬ 
ately followed by an asterisk and the com¬ 
ments. 

The first statement in the following 
example will be used by the assembler to 
generate a comments statement; the second 
statement will not. 


|Name |Operation Joperand 

| * THIS STATEMENT WILL BE GENERATED 
j. * THIS ONE WILL NOT BE GENERATED 



J 


The use of variable symbols for substi¬ 
tution in corranents statements is not 
allowed. The * or .* of a comment state¬ 
ment, therefore, cannot be created by sub¬ 
stitution for a variable symbol. 


COPY STATEMENTS 


A COPY statement is not a model statement. 
COPY statements may be used to copy model 
statements and MEXIT, MNOTE, and condi¬ 
tional assembly instructions into a macro¬ 
definition from a system library, just as 
they may be used outside macro-definitions 
to copy source statements into an assembler 
language program- 


The form of this statement is: 


|Name | Operation j Operand | 

|Not used, | COPY | A symbol | 

jmust not J j j 

| be present j j | 


The symbol in the operand entry 
identifies the section of coding to be 
copied. The symbol must not be the same as 
| the operation mnemonic of a definition in 
the Source Statement Library. Any state¬ 
ment that may be used in a macro-definition 
may be part of the copied coding, except 
MACRO, MEND, COPY, and prototype statements 

Statements COPYed into the program must 
obey the restrictions on ordering of state¬ 
ments. For example, COPY must be between 
global and local declarations in the macro¬ 
definition or in the main program if the 
COPYed text contains global and local 
declarations. 
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SECTION 8: HOW TO WRITE MACRO-INSTRUCTIONS 


The typical form of a macro-instruction is: 


|Name |Operation 

j A symbol, jMnemonic 
j s equence j operation 
j symbol, or|code 
j not used j 


|operand | 

|Zero to 100 op- j 

jerands, separated j 

|by commas. j 

I_ I 


The name entry of the macro-instruction 
may contain a symbol. The symbol will not 
be defined in the generation process unless 
a symbolic parameter appears in the name 
entry of the prototype and the same param¬ 
eter appears in the name entry of a gener¬ 
ated model statement. 

The operation entry contains the mnemon¬ 
ic operation code of the macro-instruction. 
The mnemonic operation code must be the 
same as the mnemonic operation code of a 
macro-definition in the source program or 
in the source statement library. 

The macro-definition with the same mne¬ 
monic operation code is used by the assem¬ 
bler to process the macro-instruction. If 
a macro-definition in the source program 
and one in the source statement library 
have the same mnemonic operation code, the 
macro-definition in the source program is 
used. 

The placement and order of the operands 
in the macro-instruction may be determined 
by the placement and order of the symbolic 
parameters in the operand entry of the 
prototype statement. 


MACRO-INSTRUCTION OPERANDS 


Any combination of up to 127 characters may 
be used as a macro-instruction operand 
provided that the following rules concern¬ 
ing apostrophes , parentheses, equal signs, 
ampersands, commas, and blanks are 
observed. 

Paired Apostrophes: An operand may contain 
one or more sequences of characters, each 
of which is enclosed within single apos¬ 
trophes. (The sequence of characters 
itself may contain an even number of 
apostrophes). The single apostrophes, 
which enclose the sequence of characters, 
are called paired apostrophes. 


The first sequence of characters starts 
with the first apostrophe in the operand. 
Subsequent character sequences start with 
the first apostrophe after the apostrophe 
that ends the previous sequence of charac¬ 
ters. 

In the following example, there are two 
sequences of characters enclosed within 
single apostrophes. Therefore, there are 
two sets of paired apostrophes: the first 
and fourth apostrophes, and the fifth and 
sixth apostrophes. 

• A*'B’C'D' 

An apostrophe (not within paired 
apostrophes), immediately followed by a 
letter, and immediately preceded by the 
letter L (when L is preceded by any special 
character other than an ampersand), is not 
considered in determining paired apostroph¬ 
es. For instance, the apostrophe in the 
following example is not considered. 

L* SYMBOL 

* AL'SYMBOL * is an invalid operand. 

Paired Parentheses: There must be an equal 
number of left and right parentheses. The 
nth left parenthesis must appear to the 
left of the nth right parenthesis. 

Paired parentheses are a left parenthe¬ 
sis and a following right parenthesis with¬ 
out any other parentheses intervening. If 
there is more than one pair, each addition¬ 
al pair is determined by removing any pairs 
already recognized and reapplying the above 
rule for paired parentheses. For instance, 
in the following example the first and 
fourth, the second and third, and the fifth 
and sixth parentheses are each paired pa¬ 
rentheses. 

(A(B)C)D(E) 

A parenthesis that appears between 
paired apostrophes is not considered in 
determining paired parentheses. For 
instance, in the following example the 
middle parenthesis is not considered. 

(•) *) 


Equal Signs: An equal sign can only occur 
as the first character in an operand or 
between paired apostrophes or paired pa¬ 
rentheses. The following examples illus¬ 
trate these rules. 

=F* 32 * 
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•c=o* 

E(F=G> 



Macro-Instructions," each sequence of con¬ 
secutive ampersands must be an even number 
of ampersands. The following example 
illustrates this rule. 

£61236&&g 


Commas: A comma indicates the end of an 
operand, unless it is placed between paired 
apostrophes or paired parentheses. The 
following example illustrates this rule. 

(A,B)C *,* 


Blanks: Except as noted under Statement 
Form , a blank indicates the end of the 
operand entry, unless it is placed between 
paired apostrophes . The following example 
illustrates this rule. 


OMITTED OPERANDS 


If an operand that appears in the prototype 
statement is omitted from the macro¬ 
instruction, then the comma that would have 
separated it from the next operand must be 
present. If the last operand(s) is omitted 
from a macro-instruction, then the comma<s) 
separating the last operand(s) from the 
next previous operand may be omitted. 

The following example shows a macro¬ 
instruction preceded by its corresponding 
prototype statement. The macro-instruction 
operands that correspond to the third and 
sixth operands of the prototype statement 
are omitted in this example. 


r - T - T - 

|Name jOperation |Operand j 

1-i-i-1 

j j EXAMPLE j &A,SB,SC,6D, SE,6F j 

j j EXAMPLE j17,*+4,,AREA,FIELD(6) | 

L-J.-X_J 


•A B C* 


The following are valid macro- 
instruction operands: 


SYMBOL 

123 

X* 18 9A* 

* 

L* NAME 
•TEN = 10* 
•COMMA IS ,* 


A* 2 

(TO (8), FROM) 

0(2,3) 

=F* 4096* 

AB6S9 

•PARENTHESIS IS )* 
* APOSTROPHE IS * * * 


The following are invalid macro¬ 
instruction operands: 

(odd number of apostrophes ) 
(number of left parentheses 
does not equal number of 
right parentheses) 

(blank not placed between 
paired apostrophes ) 

•ONE* IS *1* (blank not placed between 
paired apostrophes ) 


W* NAME 
5A)B 

(15 B) 


If the symbolic parameter that 
corresponds to an omitted operand is used 
in a model statement, a null character 
value (not a blank) replaces the symbolic 
parameter in the generated statement, i.e., 
in effect the symbolic parameter is 
removed. 

For example, the first statement below 
is a model statement that contains the 
symbolic parameter SC. If the operand that 
corresponds to SC was omitted from the 
macro-instruction, the second statement 
below would be generated from the model 
statement. 


1- 

] Name 

L__ 

T 

|Operation 

|Operand 

1 

1 

-1 

1 

1 

1 

| MVC 

|THERE6C.25,THIS 

1 

j MVC 

j THERE2 5,THIS 

1 

L— 

i, 

1 , .... . .. . .. 



OPERAND SUBLISTS 


STATEMENT FORM 


Macro-instructions may be written using 
the same alternate form that can be used to 
write prototype statements. If this form 
is used, a blank does not always indicate 
the end of the operand entry. The 
alternate form is described in Section 7, 
under the subsection "Macro-Instruction 
Prototype." 


An operand of a macro-instruction may be a 
sublist. 

Sublists provide the programmer with a 
convenient way to refer to: (1) a collec¬ 
tion of macro-instruction operands as a 
single operand, or (2) a single operand in 
a collection of operands. 

A sublist consists of one or more oper¬ 
ands (suboperands) separated by commas and 
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enclosed in paired parentheses- The entire 
sublist, including the parentheses, is 
considered to be one macro-instruction 
operand. 


Omitted suboperands are handled in the 
same way as omitted operands. If () 
appears as an operand, however, it is 
treated as a character string, not as a 
sublist with all suboperands omitted. 


The operand of the macro-instruction 
that corresponds to symbolic parameter 6NUM 
is a sublist. One of the operands in the 
sublist is referred to in the operand entry 
of three of the model statements. For 
example, SNUM(l) refers to the first oper¬ 
and in the sublist corresponding to symbol¬ 
ic parameter &NUM. The first operand of 
the sublist is A- Therefore, A replaces 
SNUMC1) to form part of the generated 
statement. 


If a macro-instruction is written in the 
alternate statement format, each sublist 
operand may be written on a separate line; 
the macro-instruction may be written on as 
many lines as there are operands, including 
sublist operands. 

The limit of 127 characters per operand 
applies to an entire sublist including 
suboperands, parentheses, and commas within 
these parentheses. 

If 6Pi is a symbolic parameter in a 
prototype statement, and the corresponding 
operand of a macro-instruction is a sub¬ 
list, then SPICn) may be used in a model 
statement to refer to the nth operand of 
the sublist, where n may be any arithmetic 
expression allowed in a SETA instruction. 
The SETA instruction is described in Sec¬ 
tion 9 . If 6P1 is a symbolic parameter, 
and the corresponding operand of a macro¬ 
instruction is a sublist, then $P1 refers 
to the entire sublist (including 
parentheses). 

If the sublist notation is used, but the 
operand is not a sublist, then 6P1(1) 
refers to the operand and SP1(2) through 
6P1(100) refer to a null character value. 

If an operand has the form ( ), it is 
treated as a character string and not as a 
sublist. 

For example, consider the following 
macro-definition, macro-instruction, and 
generated statements. 


| Name 

»■- 

Header | 

Prototype j 
Model j 

Model j 

Model j 

Model | 

Trailer 


Macro 
Generatedj 
Generated! 
Generated! 
Generated J 


l-— 


lOperation J Operand j 

|MACRO 

|6NUM,SREG,6AREA 
j 6 REG,&NUM(1) 
j SREG,£NUM(2) 
j SREG,&NUM (3) 

|&REG,SAREA 


L_ 


|ADDNUM 

II* 

|A 
|A 
j ST 
I MEND 

|ADDNUM 

II* 

IA 
IA 
j ST 

-J- 


-+- 


!(A,B,C),6,SOM 
16,A 
16, B 
|6,C 
|6,SUM 

-J.- 


H 


Note: When referring to an operand in a 
sublist, the left parenthesis of the sub¬ 
list notation must immediately follow the 
last character of the symbolic parameter, 
e.g., 6NUM(1). A period should not be 
placed between the left parenthesis and the 
last character of the symbolic parameter. 

A period may be used between these two 
characters only when the programmer wants 
to concatenate the left parenthesis with 
the characters that the symbolic parameter 
represents. The following example shows 
what would be generated if a period 
appeared between the left parenthesis and 
the last character of the symbolic parame¬ 
ter in the first model statement of the 
above example. 


|Name|Operation|Operand | 

Prototype| |ADDNUM |£NUM,SREG,SAREA ] 

Model j j L j&REG,SNUM.(1) j 

Macro I IADDNUM I(A,B,C),6,SUM \ 

Generated| }l |6,(A,B,C)(1) ] 


The symbolic parameter 6NUM is used in 
the operand entry of the model statement. 
The characters (A,B,C) of the macro¬ 
instruction correspond to 6NUM. Since SNUM 
is immediately followed by a period, SNUM 
and the period are replaced by (A,B,C). 

The period does not appear in the generated 
statement. The resulting generated 
statement is an invalid assembler language 
statement. 


INNER MACRO-INSTRUCTIONS 


A macro-instruction may be used as a model 
statement in a macro-definition. Macro¬ 
instructions used as model statements are 
called inner macro-instructions. 

A macro-instruction that is not used as 
a model statement is referred to as an 
outer macro-instruction. 
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Any symbolic parameters used in an inner 
macro-instruction are replaced by the 
corresponding operands of the outer macro¬ 
instruction. 


Note : An ampersand that is part of a 
symbolic parameter is not considered in 
determining whether a macro-instruction 
operand contains an even number of 
consecutive ampersands. 


The macro-definition corresponding to an 
inner macro-instruction is used to generate 
the statements that replace the inner 
macro-instruction. 


The ADDNUM macro-instruction of the 
previous example is used as an inner macro¬ 
instruction in the following example. 


The inner macro-instruction contains two 
symbolic parameters, SS and £T- The 
characters <X,Y,Z) and J of the macro¬ 
instruction correspond to 6S and £T, 
respectively. Therefore, these characters 
replace the symbolic parameters in the 
operand entry of the inner macro¬ 
instruction. 


The assembler then uses the macro¬ 
definition that corresponds to the inner 
macro-instruction to generate statements to 
replace the inner macro-instruction. The 
fourth through seventh generated statements 
have been generated for the inner macro¬ 
instruction . 


j Name j Operation | Operand 


\- -f— 




Header \ 

| MACRO 

1 

Prototype! 

JCOMP 

J £Rl,£R2,£S,£T,£U 

Model j 

ISR 

j £R1,6R2 

Model j 

|C 

j £R1,£T 

Model j 

j BNE 

(£U 

1 

Inner } 

i 

jADDNUM 

{£S,12,£T| 

i i 

Model |£U |A 

T - 

!£R1,£T 

Trailer j 

| MEND 

1 

1 

(MACRO 

1 

1 

| ADDNUM 

j £NUM,6REG,6AREA 

1 

|I* 

|6REG,£NUM(1) 

1 

|A 

I£REG,£NUM(2) 

1 

|A 

j £REG,£NUM(3) 

1 

|ST 

j £REG,£AREA 

1 

L 

j MEND 

j 

Outer |K 

!COMP 

jio,n, (x,y,z) ,j. 

L_ 

1 

* 

r 

| 

1 

Generated| 

JSR 

110,11 

Generated! 

|c 

|10,J 

Generated j 

|BNE 

JK 

1 

| -—— — 

-- ! 

Generated! 

II* 

|12.X j 

Generated! 

1A 

I12.Y | 

Generated j 

1A 

112,Z | 

Generated J 

i 

j ST 

\ 12,J ! 

1 

GeneratedJK 

| 

|A 

110,J 


L— 




LEVELS OF MACRO-INSTRUCTIONS 


A macro-definition that corresponds to an 
outer macro-instruction may contain any 
number of inner macro-instructions. The 
outer macro-instruction is called a first 
level macro-instruction. Each of the inner 
macro-instructions is called a second level 
ma cro-instruction. 


The macro-definition that corresponds to 
a second level macro-instruction may con¬ 
tain any number of inner macro¬ 
instructions. These macro-instructions are 
called third level macro-instructions, etc. 


The number of levels of macro¬ 
instructions that may be used depends upon 
the complexity of the macro-definition and 
the amount of storage available. This is 
described in detail in Appendix H. 
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SECTION 9: HOW TO WRITE CONDITIONAL ASSEMBLY INSTRUCTIONS 


The conditional assembly instructions allow 
the programmer tos <1) define and assign 
values to SET symbols that can be used to 
vary parts of generated statements, and (2) 
vary the sequence of generated statements. 
Thus, the programmer can use these 
instructions to generate many different 
sequences of statements from the same 
macro- definition. 

There are 13 conditional assembly 
instructions, 10 of which are described in 
this section. The other three conditional 
assembly instructions — GBLA, GBLB, and 
GBLC — are described in Section 10. The 
instructions described in this section are: 

L/C LA SETA AIF ANOP 

LCLB SETB AGO 

LCLC SETC ACTR 

The primary use of the conditional 
assembly instructions is in macro- 
definitions. However, all of them may be 
used in an assembler language source 
program. 

Where the use of an instruction outside 
macro-definitions differs from its use 
within macro-definitions, the difference is 
described in the subsequent text. 

The LCLA, LCLB, and LCLC instructions 
are used to define and assign initial 
values to local SET symbols. 

The SETA, SETB, and SETC instructions 
may be used to assign arithmetic, binary, 
and character values, respectively, to SET 
symbols. The SETB instruction is described 
after the SETA and SETC instructions, 
because the operand of the SETB instruction 
is a combination of the operands of the 
SETA and SETC instructions. 

The AIF, AGO, and ANOP instructions may 
be used in conjunction with sequence sym¬ 
bols to vary the sequence in which state¬ 
ments are assembled. The programmer can 
test attributes assigned by the assembler 
to symbols or macro-instruct!on operands to 
determine which statements are to be proc¬ 
essed. The ACTR instruction may be used to 
limit the number of AIF and AGO branches 
executed in any assembly. 

Examples illustrating the use of condi¬ 
tional assembly instructions are included 
throughout this section. A chart summariz¬ 
ing the elements that can be used in each 
instruction appears at the end of this 
section. 


SET SYMBOLS 


SET symbols are one type of variable sym¬ 
bol. The symbolic parameters discussed in 
Section 7 are another type of variable 
symbol. SET symbols differ from symbolic 
parameters in three ways: (1) where they 
can be used in an assembler language source 
program, (2) how they are assigned values, 
and (3) how the values assigned to them can 
be changed. 

Symbolic parameters can only be used in 
macro-definitions, whereas SET symbols can 
be used inside and outside macro¬ 
definitions. 

SET symbols are assigned values by SETA, 
SETB, and SETC conditional assembly 
instructions and by local or global dec¬ 
larations. 

Each symbolic parameter is assigned a 
single value for one use of a macro¬ 
definition, whereas the values assigned to 
each SETA, SETB, and SETC symbol are not so 
restricted. 


Defining SET Symbols 


SET symbols must be defined by the 
programmer before they are used. When a 
SET symbol is defined it is assigned an 
initial value. SET symbols may be assigned 
new values by means of the SETA, SETB, and 
SETC instructions. A SET symbol is defined 
when it appears as an operand of an LCLA, 
LCLB, or LCLC instruction. 


Using Variable Symbols 


The SETA, SETB, and SETC instructions may 
be used to change the values assigned to 
SETA, SETB, and SETC symbols, respectively. 
When a SET symbol appears in the name or 
operand entry of a statement, the current 
value of the SET symbol (i.e., the last 
value assigned to it) replaces the SET 
symbol in the statement. When a SETC sym¬ 
bol appears in the operation entry of a 
statement, the current value of the SETC 
symbol replaces the SET symbol in the 
statement. 
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For example, if €A is a symbolic parame¬ 
ter, and the corresponding characters of 
the macro-instruction are the symbol HERE, 
then HERE replaces each occurrence of SA in 
the macro-definition. However, if SA is a 
SET symbol, the value assigned to 6A can be 
changed, and a different value can replace 
various occurrences of SA in the macro¬ 
definition. 

The same variable symbol may not be used 
as a symbolic parameter and as a SET symbol 
in the same macro-definition. 

The following illustrates this rule. 


processing the definition. If a SET symbol 
is used in the operand entry of a macto- 
instruction, and the value assigned to the 
SET symbol is in the form of sublist 
notation, the operand is not considered a 
sublist. 


ATTRIBUTES 


The assembler assigns attributes to macro¬ 
instruction operands and to symbols in the 
program. These attributes may be referred 
to only in conditional assembly 
instructions. 


i- r -1- -j 

{Name (operation (operand J 

[sNAME I MOVE |6TO,6FROM j 

l-X-X- J 

If the statement above is a prototype 
statement, then SHAME, 6TO, and 6FROM may 
not be used as SET symbols in the macro¬ 
definition. 

The same variable symbol may not be used 
as two different types of SET symbols in 
the same macro-definition. Similarly, the 
same variable symbol may not be used as two 
different types of SET symbols outside 
macro-definitions. 

For example, if 6A is a SETA symbol in a 
macro-definition, it cannot be used as a 
SETC symbol in that definition. Similarly, 
if SA is a SETA symbol outside macro¬ 
definitions, it cannot be used as a SETC 
symbol outside macro-definitions. 

The same variable symbol if declared 
local may be used in two or more macro¬ 
definitions and outside macro-definitions. 
If such is the case, the variable symbol 
will be considered a different variable 
symbol each time it is used. 


There are six kinds of attributes. They 
are: type, length, scaling, integer, 
count, and number. 


If an outer macro-instruction operand is 
a symbol before substitution, then the 
attributes of the operand are the same as 
the corresponding attributes of the symbol. 
The symbol must appear in the name entry of 
an assembler language statement or in the 
operand entry of an EXTRN statement in the 
program. The statement must be outside 
macro-definitions and must not contain any 
variable symbols. 

If an inner macro-instruction operand is 
a symbolic parameter, then attributes of 
the operand are the same as the attributes 
of the corresponding outer macro- 
instruction operand. 


Each attribute has a notation associated 
with it. The notations are: 


Attribute 

Type 

Length 

Scaling 

Integer 

Count 

Number 


Notation 

T* 

L* 

S' 

I* 

K' 

N* 


For example, if SA is a variable symbol 
(either SET symbol or symbolic parameter) 
in one macro-definition, it can be used as 
a variable symbol (either SET symbol or 
symbolic parameter) in another definition. 
Similarly, if SA is a variable symbol (SET 
symbol or symbolic parameter) in a macro¬ 
definition, it can be used as a SET symbol 
outside macro-definitions. 

All variable symbols may be concatenated 
with other characters in the same way as 
symbolic parameters. The rules for 
concatenation are in Section 7 under the 
subsection Model Statements . 

Variable symbols in macro-instructions 
are replaced by the values assigned to 
them, immediately prior to the start of 


If a macro-instruction operand is a 
sublist, the programmer may refer to the 
attributes of either the sublist or each 
operand in the sublist. The type, length, 
scaling, and integer attributes of a 
sublist are the same as the corresponding 
attributes of the first operand in the 
sublist. 

All the attributes of macro-instruction 
operands may be referred to in conditional 
assembly instructions within macro¬ 
definitions. However, only the type, 
length, scaling, and integer attributes of 
symbols may be referred to in conditional 
assembly instructions outside macro- defi¬ 
nitions. Symbols appearing in the name 
entry of generated statements are not 
assigned attributes. 
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The programmer may refer to an attribute 
in the following ways: 

1. In a statement that is outside macro- 
definitions, he may write the notation 
for the attribute immediately followed 
by a symbol- (E.g., T'NAME refers to 
the type attribute of the symbol NAME.) 

2. In a statement that is in a macro¬ 
definition, he may write the notation 
for the attribute immediately followed 
by a symbolic parameter. (E.g., 

L* 6NAME refers to the length attribute 
of the characters in the macro- 
instruction that correspond to symbolic 
parameter fcNAME; L* 6NAME(2) refers to 
the length attribute of the second 
operand in the sublist that corresponds 
to symbolic parameter SNAME.) 


Type Attribute (T*) 


The type attribute of a macro-instruction 
operand or a symbol is a letter. 

The programmer may refer to a type 
attribute in the operand of a SETC instruc¬ 
tion, or in character relations in the 
operands of SETB or AIF instruction, or in 
other instructions where use of the charac¬ 
ter is valid. 

The following letters are used for sym¬ 
bols that name DC and DS statements and for 
outer macro-instruction operands that are 
symbols that name DC or DS statements. 


A A-type address constant, 

implied length, aligned. 

B Binary constant. 

C Character constant. 

D Long floating-point constant, 

implied length, aligned. 

E Short floating-point constant, 

implied length, aligned. 

F Full-word fixed-point constant, 

implied length, aligned. 

G Fixed-point constant, explicit 

length. 

H Half-word fixed-point constant, 

implied length, aligned. 

K Floating-point constant, 

explicit length. 

P Packed decimal constant. 

R A—, S—, V-, or Y-type address 

constant, explicit length. 

S S-type address constant, 

implied length, aligned. 

V V-type address constant, 
implied length, aligned. 

X Hexadecimal constant. 

Y Y-type address constant, 
implied length, aligned. 

Z Zoned decimal constant. 


The following letters are used for sym¬ 
bols (and outer macro-instruction operands 
that are symbols) that name statements 
other than DC or DS statements, or that 
appear in the operand field of an EXTRN 
statement. 

I Machine instruction 

J Control section name 

M Macro-instruction 

T External symbol 

W CCW assembler instruction 

The following letters are used for inner 
and outer macro-instruction operands only. 

N Self-defining term 

O Omitted operand 

The letter U (Undefined) is used for 
inner and outer macro-instruction operands 
that cannot be assigned any of the above 
letters. The type attribute of all liter¬ 
als appearing as macro-instruction operands 
is U. This also is true for inner macro¬ 
instruction operands that are ordinary 
symbols or variable symbols. Because the 
attributes are not available at the 
necessary time, this letter is also 
assigned to symbols that name EQU and LTORG 
statements, to any symbols occurring more 
than once in the name entry of source 
statements, and to all symbols naming DC 
and DS statements with expressions or vari¬ 
able symbols as modifiers. The type attri¬ 
bute also is undefined when the modifier 
expression consists solely of self-defining 
terms. 

The attributes of A, B, C, and D in the 
following examples are undefined: 


A 

DC 

3FL( A-B) *15 

B 

DC 

(A-B)F*15* 

C 

DC 

SX*1* 

D 

DC 

FL( 3-2) *1* 


Length (L*), Scaling (S*), and Integer (I*) 
Attributes 


The length, scaling, and integer attributes 
of macro-instruction operands and symbols 
are numeric values. 

The length attribute of a symbol (or of 
a macro-instruction operand that is a 
symbol) is as described in Part I of this 
publication- Reference to the length 
attribute of a variable symbol is illegal 
except for symbolic parameters in SETA, 
SETB, and AIF statements. If the basic L* 
attribute is desired, it can be obtained as 
follows: 

6A SETC *Z* 
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&B SETC * L* *' 

MVC SA. <£BSA),X 

After generation, this would result in 
MVC Z (L* Z) ,X 

Reference must not be made to the length 
attributes of symbols or macro-instruction 
operands whose type attributes are the 
letters M, N, 0, T, or 0. 

Scaling and integer attributes are pro¬ 
vided for symbols that name fixed-point, 
floating-point, and decimal DC or DS state¬ 
ments. 


Fixed and Floating Point: The scaling 
attribute of a fixed point or floating 
point number is the value given by the 
scale modifier. The integer attribute is a 
function of the scale and length attributes 
of the number. 


The programmer may refer to the count 
attribute in the operand field of a SETA 
instruction, or in arithmetic relations in 
the operand fields of SETB and AIF instruc¬ 
tions that are part of a macro-definition. 


Number Attribute (N* ) 


The programmer may refer to the number 
attribute of macro-instruction operands 
only. 

The number attribute is a value equal to 
the number of operands in an operand sub¬ 
list. The number of operands in an operand 
sublist is equal to one plus the number of 
commas that indicate the end of an operand 
in the sublist. 


Decimal: The scaling attribute of a deci¬ 

mal number is the number of decimal digits 
to the right of the decimal point. The 
integer attribute of a decimal number is 
the number of decimal digits to the left of 
the decimal point. 

Scaling and integer attributes are 
available for symbols and macro-instruction 
operands only if their type attributes are 
H, F, and G (fixed point); D, E, and K 
(floating point); or P and Z (decimal). 

The programmer nay refer to the length, 
scaling, and integer attributes in the 
operand field of a SETA instruction, or in 
arithmetic relations in the operand fields 
of SETB or AIF instructions. 


The following examples illustrates this 
rule. 


(A,B,C,D,E) 
(A, , C, D, E) 
(A,B,C,D) 

(, B,C, D,E) 

(A, B, C, D, ) 
(A,B,C,D,,) 


5 operands 
5 operands 

4 operands 

5 operands 

5 operands 

6 operands 


If the macro-instruction operand is not 
a sublist, the number attribute is one. If 
the macro-instruction operand is omitted, 
the number attribute is zero. 


The programmer may refer to the number 
attribute in the operand field of a SETA 
instruction, or in arithmetic relations in 
the operand fields of SETB and AIF instruc¬ 
tions that are part of a macro-definition. 


Count Attribute (K*) 


The programmer may refer to the count 
attribute of macro-instruction operands 
only. 

The count attribute is a value equal to 
the number of characters in the macro¬ 
instruction operand after substituting for 
variable symbols, excluding commas. If the 
operand is a sublist, the count attribute 
includes the beginning and ending 

list. The count attribute of an omitted 
operand is zero. 

If a macro-instruction operand contains 
variable symbols, the characters that 
replace the variable symbols, rather than 
the variable symbols, are used to determine 
the count attribute. 


Assigning Integer Attributes to Symbols 


The integer attribute is computed from the 
length and scaling attributes. 


Fixed Point: The integer attribute of a 
fixed-point number is equal to eight times 
the length attribute of the number minus 
the scaling attribute minus one; i.e.. 

Each of the following statements defines 
a fixed-point field. The length attribute 
of HALFCON is 2, the scaling attribute is 
6, and the integer attribute is 9. The 
length attribute of ONECON is 4, the scal¬ 
ing attribute is 8, and the integer attri¬ 
bute is 23. 
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SEQUENCE SYMBOLS 


{Name (Operation (Operand ) 

[hALFCON |dC (HS6 * -25.93* } 

j ON ECO N |DC | FS8'100.3E-2* j 

L_L_L-1 


Floating Point; The integer attribute of a 
floating-point number is equal to two times 
the difference between the length attribute 
of the number and one, minus the scaling 
attribute; i.e., I'=2*(L*-1)-S*. 

Each of the following statements defines 
a floating-point value. The length attri¬ 
bute of SHORT is 4, the scaling attribute 
is 2, and the integer attribute is 4. The 
length attribute of LONG is 8, the scaling 
attribute is 5, and the integer attribute 
is 9. 


The name entry of a statement may contain a 
sequence symbol. Sequence symbols provide 
the programmer with the ability to vary the 
sequence in which statements are processed 
by the assembler. 


A sequence symbol is used in the operand 
entry of an AIF or AGO statement to refer 
to the statement named by the sequence 
symbol. 


A sequence symbol may be used in the 
name entry of any statement that does not 
contain a symbol or SET symbol, except a 
prototype statement, or a MACRO, LCLA, 
LCLB, LCLC, GBLA, GBLB, GBLC, ACTR, ICTL, 
ISEQ, or COPY instruction. 


(Name (Operation J Operand ( 

j*SHORT |DC |eS2* 46.415* | 

(LONG (DC (DS5*-3.729* | 


Decimal: The integer attribute of a packed 
decimal number is equal to two times the 
length attribute of the number minus the 
scaling attribute minus one; i.e., 

I* =2*L* —S*-l. The integer attribute of a 
zoned decimal number is equal to the dif¬ 
ference between the length attribute and 
the scaling attribute; i.e., I*-L*-S*. 

Each of the following statements defines 
a decimal field. The length attribute of 
FIRST is 2, the scaling attribute is 2, and 
the integer attribute is 1. The length 
attribute of SECOND is 3, the scaling 
attribute is 0, and the integer attribute 
is 3. The length attribute of THIRD is 4, 
the scaling attribute is 2, and the integer 
attribute is 2. The length attribute of 
FOURTH is 3, the scaling attribute is 2, 
and the integer attribute is 3. 


r- t-t- 1 

(Name (Operation (Operand ( 

[first |dc jp*-n.25* | 

(SECOND I DC |Z*-543* j 

(THIRD (DC 12*79.68* J 

1 FOURTH jDC |P*79.68* 1 


A sequence symbol consists of a period 
followed by one through seven letters 
and/or digits, the first of which must be a 
letter. 

The following are valid sequence sym¬ 
bols: 

.READER .A23456 
.LOOP2 .X4F2 

.N . S4 


The following are invalid sequence sym¬ 
bols: 


CARDAREA 


. 246B 


.AREA2456 
.BCD%8 4 
.IN AREA 


(first character is not 
a period) 

(first character after 
period is not a letter) 
(more than seven characters 
after period) 

(contains a special character 
other than initial period) 
(contains a special 

character, i.e., blank, 
other than initial period) 


If a sequence symbol appears in the name 
entry of a macro-instruction, and the cor¬ 
responding prototype statement contains a 
symbolic parameter in the name entry, the 
sequence symbol does not replace the sym¬ 
bolic parameter wherever it is used in the 
raa cro-definition. 

The following example illustrates this 
rule. 
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(Name |Operation jOperand 



\ - 

1 

1 MACRO 

1 

~ -j 

1 

|6NAME 

j MOVE 

j €TO,£FROM 


2 

j 6NAME 

ST 

j2,SAVEAREA 



1 

|L 

j2,6FROM 



1 

ST 

j 2,STO 




|L 

j 2,SAVEAREA 



1 

l- 

| . SYM 

l - 

j MEND 

1 

— 

1 

3 

1 

J MOVE 
~+- 

|fielda,fieldb 


| ST 
|L 
|ST 
JL 

-X- 


|2,SAVEAREA 
J 2,FIELDB 
|2,FIELDA 
j 2,SAVEAREA 


The symbolic parameter 6NAME is used in 
the name entry of the prototype statement 
(statement 1) and the first model statement 
(statement 2). In the macro-instruction 
(statement 3) a sequence symbol (.SYM) 
corresponds to the symbolic parameter 
SNAME. 6NAME is not replaced by .SYM, and, 
therefore, the generated statement 
(statement 4) does not contain a name 
entry. 


LOLA,LCLB«LCLC — DEFINE SET SYMBOLS 

The typical form of these instructions is: 

| Name |Operation! Operand | 

|Not used,]LCLA, jone or more variable j 
jmust not |LCLB, or |symbols, that are j 

j be j LCLC |to be used as SET j 

|present j |symbols, separated J 

| j j by commas j 


The LCLA, LCLB, and LCLC instructions 
are used to define and assign initial 
values to SETA, SETB, and SETC symbols, 
respectively. The SETA, SETB, and SETC 
symbols are assigned the initial values of 
0, 0, and null character value, respective¬ 
ly* 


The programmer should not define any SET 
symbol whose first four characters are 
6SYS. 

All LCLA, LCLB, or LCLC instructions in 
a macro-definition must appear immediately 
after the prototype statement and all GBLA, 
GBLB or GBLC instructions, or another LCLA, 
LCLB, or LCLC instruction. All LCLA, LCLB, 
or LCLC instructions outside macro¬ 
definitions must appear after all macro¬ 
definitions in the source program, after 


all GBLA, GBLB, and GBLC instructions 
outside macro-definitions, before all con¬ 
ditional assembly instructions, and PUNCH 
and REPRO statements outside macro¬ 
definitions, and before the first control 
section of the program. 


SETA — SET ARITHMETIC 


The SETA instruction may be used to assign 
an arithmetic value to a SETA symbol. The 
form of this instruction is: 

|Name |Operation {Operand J 

|A SETA I SETA |A SETA arithmetic | 

|symbol j j expression j 


The expression in the operand entry is 
evaluated as a signed 32-bit arithmetic 
value which is assigned to the SETA symbol 
in the name entry. The minimum and maximum 
allowable values of the expression are -2 3i 
and +2 3i -l, respectively. 

The expression may consist of one term 
or an arithmetic combination of terms.. The 
terms that may be used alone or in 
combination with each other are self¬ 
defining terms, variable symbols, and the 
length, scaling, integer, count, and number 
attributes. Self-defining terms are 
described in Part 1 of this publication. 

Note : A SETC variable symbol may appear 

in a SETA expression only if the value of 
the SETC variable is one to eight decimal 
digits. The decimal digits will be con¬ 
verted to a positive arithmetic value. 

The arithmetic operators that may be 
used to combine the terms of an expression 
are + (addition), - (subtraction), 

* (multiplication), and / (division). 

An expression may not contain two terms 
or two operators in succession, nor may it 
begin with an operator. 

The following are valid operand fields 
of SETA instructions: 


6AREA+X* 2D* 
SBETA*10 
L* 6HERE + 32 


I * 6N/25 

6EXIT-S* 6ENTRY+1 
29 


The following are invalid operand fields 
of SETA instructions: 
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&AREAX* C* 
6 FIELD+- 
-6DELTA*2 
*+32 

NAME/15 


(two terms in succession) 

(two operators in succession) 
(begins with an operator) 
(begins with an operator; 

two operators in succession) 
(NAME is not a valid term) 


increased by one for each occurrence of a 
variable symbol as well as the operation 
entry- The maximum value this counter may 
attain is 35- (See Appendix H). 


EVALUATION OF ARITHMETIC EXPRESSIONS 


Using SETA Symbols 


The procedure used to evaluate the arith¬ 
metic expression in the operand of a SETA 
instruction is the same as that used to 
evaluate arithmetic expressions in assem¬ 
bler language statements. The only 
difference between the two types of arith¬ 
metic expressions is the terms that are 
allowed in each expression. 


The arithmetic value assigned to a SETA 
symbol is substituted for the SETA symbol 
when it is used in an arithmetic relation. 
If the SETA symbol is not used in an arith¬ 
metic expression, the arithmetic value is 
completely converted to an unsigned inte¬ 
ger, with leading zeros removed. If the 
value is zero, it is converted to a single 
zero. 


The following evaluation procedure is 

used: The following example illustrates this 

rule: 




1 - 

T« ■— —— — 

T--- 

- 1 

1. Each term is given its numerical 


| Name 

{Operation 

{Operand 

1 

value. 


| - 

-4- 

-4- 

- 4 

2. The arithmetic operations are per- 


1 

{MACRO 

1 


formed moving from left to right. 


1 6 NAME 

{MOVE 

j 6 TO, 6 FROM 


However, multiplication and/or divi- 


1 

{LCLA 

j SA, SB, SC, SD 


sion are performed before addition and 

1 

| SA 

{SETA 

|10 


subtraction. 

2 

| SB 

{SETA 

112 


3. The computed result is the value 

3 

1 &c 

j SETA 

j SA-SB 


assigned to the SETA symbol in the 

4 

| SD 

{SETA 

j SA+SC 


name entry. 


| 6 NAME 

{ST 

J 2,SAVEAREA 



5 

1 

|L 

j 2,SFROM6C 


The arithmetic expression in the operand 

6 

1 

{ST 

|2,STOSD 


entry of a SETA instruction may contain one 


1 

|L 

j 2,SAVEAREA 


or more sequences of arithmetically com- 


1 

{MEND 

1 


bined terms that are enclosed in parenthe- 


|- 


_ + - 

- 4 

ses. A sequence of parenthesized terms may 


j HERE 

{MOVE 

{FIELDA,FIELDB 


appear within another parenthesized 


1 - 

-4—-- 

—4- 

- 4 

sequence. 


| HERE 

{ST 

J 2,SAVEAREA 




I 

1 L 

|2,FIELDB2 


The following are examples of SETA 


1 

{ST 

j 2,FIELDA8 


instruction operands that contain parenthe- 


1 

|L 

{2, SAVEAREA 


sized sequences of terms. 


l- 

- J - 

-J.- 

-j 


(L* SHERE*32)*29 

&AREA+X* 2D*/(SEXIT-S* SENTRY+1) 

&BETA*10*(I *SN/25/(SEX IT-S*€ENTRY*1)) 

The parenthesized portion or portions of 
an arithmetic expression are evaluated 
before the rest of the terms in the expres¬ 
sion are evaluated, if a sequence of 
parenthesized terms appears within another 
parenthesized sequence, the innermost 
sequence is evaluated first. 

The SETA arithmetic expression can only 
have three levels of parentheses. The 
parentheses required in subscripting, 
substring, and sublist notation count when 
determining these levels. A counter is 
maintained for each SETA statement and 


Statements 1 and 2 assign to the SETA 
symbols SA and SB the arithmetic values +10 
and +12, respectively. Therefore, state¬ 
ment 3 assigns the SETA symbol SC the 
arithmetic value -2. When SC is used in 
statement 5, the arithmetic value -2 is 
converted to the unsigned integer 2. When 
SC is used in statement 4, however, the 
arithmetic value -2 is used. Therefore, SD 
is assigned the arithmetic value + 8 . When 
SD is used in statement 6 , the arithmetic 
value +8 is converted to the unsigned inte¬ 
ger 8 . 

The following example shows how the 
value assigned to a SETA symbol may be 
changed in a macro-definition- 


76 










| Name 

i_ _ _ 

|Operation 

“T- 

|Operand 

i . 

) 


| Name 

T - “ - 

|Operation 

|Operand 

i .. ... . 


1 

|MACRO 

1 — 

1 

_ 

i 


j_ 

i 

)MACRO 

f - 

1 


|6NAME 

| MOVE 

j 6TOSFROM 

i 

1 

i 

j ADDX 

j SNUMBER, SREG 


1 

j LCLA 

j SA 

i 


i 

ILCLA 

j SLAST 

1 

j & A 

| SETA 

1 5 

i 

2 

j SLAST 

j SETA 

J N* SNUMBER 


|6NAME 

| ST 

j 2,SAVEAREA 

i 


1 

|L 

J SREG,SNUMBER(1) 

2 

1 

1 L 

j2,SFROM&A 

i 

3 

1 

| A 

j SREG,SNUMBER(SLAST) 

3 

j 6 A 

| seta 

1 8 

i 


1 

j ST 

j SREG,SNUMBER(1) 

4 

1 

ST 

j 2,6TOSA 

i 


1 

|MEND 

1 


1 

1 L 

|2,SAVEAREA 

i 


[ - 

4- 

—4-- — - — - 


1 

i ....... .. 

j MEND 

j 

i 

. 4 

4 

1 

L 

j ADDX 

|(A,B,C,D,E),3 


1 

(HERE 

T 

| MOVE 

Jfielda,fieldb 

1 

1 


I 

i 

|L 

j 

1 3 , A 


l- 

—■f- 

-j- — 

--I 


1 

| A 

1 3 , E 


j HERE 

| ST 

|2,SAVEAREA 

1 


1 

j ST 

1 3 , A 


1 

j L 

j 2,FIELDB5 

1 


L _ _ 

.X- 



1 

| ST 

|2,FIELDA8 

1 






1 

|L 

|2,SAVEAREA 

1 






L— 




Statement 1 assigns the arithmetic value 
+5 to SETA symbol SA. In statement 2, SA 
is converted to the unsigned integer 5. 
Statement 3 assigns the arithmetic value +8 
to 6 A. in statement 4, therefore, SA is 
converted to the unsigned integer 8 , 
instead of 5. 


SNUMBER is the first symbolic parameter 
in the operand entry of the prototype 
statement (statement 1). The corresponding 
characters, (A,B,C,D,E), of the macro¬ 
instruction (statement 4) are a sublist. 
Statement 2 assigns to SLAST the arithmetic 
value +5, which is equal to the number of 
operands in the sublist. Therefore, in 
statement 3, 6 NUMBER(SLAST) is replaced by 
the fifth operand of the sublist. 


A SETA symbol may be used with a symbol¬ 
ic parameter to refer to an operand in an 
operand sublist. If a SETA symbol is used 
for this purpose it must have been assigned 
a value in the range 1 to 100 . 


SETC — SET CHARACTER 


The SeTC instruction is used to assign a 
character value to a SETC symbol. The form 
of this instruction is: 


Any expression that may be used in the 
operand of a SETA instruction may be used 
to refer to an operand in an operand sub¬ 
list. 


Sublists are described in Section 8 
under Operand Sublists . 


The following macro-definition may be 
used to add the last operand in an operand 
sublist to the first operand in an operand 
sublist and store the result at the first 
operand. A sample macro-instruction and 
generated statements follow the macro¬ 
definition. 


r - T - T - •, 

(Name |Operation |Operand | 

|A SETC JSETC jOne operand, of | 

j symbol | _[ the form described j 

j | | below | 

I-L-L_J 


The operand may consist of the type 
attribute, a character expression, a 
substring notation, or a concatenation of 
substring notations and character expres¬ 
sions. A SETA symbol may appear in the 
operand of a SeTC statement. The result is 
the character representation of the decimal 
value, unsigned, with leading zeros 
removed. If the value is zero, one decimal 
zero is used. 


TYPE ATTRIBUTE 


The character value assigned to a SETC 
symbol may be a type attribute. If the 
type attribute is used, it must appear 


Writing Conditional Assembly Instructions 77 


















alone in the operand field. The following 
example assigns to the SETC symbol 6TYPE 
the letter that is the type attribute of 
the macro-instruction operand that corre¬ 
sponds to the symbolic parameter 6ABC. 


(Name |Operation JOperand 

| SLENGTH |SETC |*L** SYMBOL* 


1 


*1 

I 


(Name |Operation |Operand | 

6 TYPE | SETC {t’SABC \ 

L_X- X -J 


CHARACTER EXPRESSION 


A character expression consists of any 
combination of characters enclosed in apos¬ 
trophes. The maximum length of a character 
expression is 127 characters. 

The character value enclosed in apos¬ 
trophes in the operand field is assigned to 
the SETC symbol in the name entry. The 
maximum length character value that can be 
assigned to a SETC symbol is eight charac¬ 
ters. If a value greater than 8 is speci¬ 
fied, the leftmost 8 characters will be 
used. 


Variable symbols may be concatenated 
with other characters in the operand field 
of a SETC instruction according to the 
general rules for concatenating variable 
symbols with other characters (see Section 
7 ). 

If SALPHA has been assigned the charac¬ 
ter value AB% 4 , the following statement may 
be used to assign the character value 
AB% 4 RST to the variable symbol 6GAMMA. 


r-r---r- 1 

(Name |Operation |Operand | 

K-+-+-4 

j&GAMMA |SETC |'&ALPHA.RST* j 

|Name {Operation {Operand | 

t - + -+- 1 

j 6DELTA j SETC j * 6ALPHA*.* RST* | 

L_L_X-J 


EVALUATION OF CHARACTER EXPRESSIONS: The 
following statement assigns the character 
value AB %4 to the SETC symbol 6ALPHA: 


1 Name |Operation {Operand 

[6ALPHA |SETC |*AB%4* 

L- X - X - 



More than one character expression may 
be concatenated into a single character 
expression by placing a period between the 
terminating apostrophe of one character 
expression and the opening apostrophe of 
the next character expression- For exam¬ 
ple, either of the following statements may 
be used to assign the character value 
ABCDEF to the SETC symbol 6BETA. 


|Name |Operation |Operand 

|6BETA ISETC |* ABCDEF* 

j 6BETA j SETC j * ABC*.* DEF* 

L_ X - X - 



Two ampersands must be used to represent 
an ampersand that is not part of a variable 
symbol. Both ampersands become part of the 
character value assigned to the SETC sym- 
bol. They are not replaced by a single 
ampersand . 


The following statement assigns the 
character value HALF66 to the SETC symbol 
SAND. 


1- 

J Name 

L 

{Operation |Operand 

| j. ........ ... 

1 

i 

1 

Q 1 

5 1 

< i 

J SETC | * HALF&6 * 

1 

J 


In this example. 


{Name {Operation {Operand 

{ 6A {SETC |*&6BETA*( 2 , 5 ) 



* SSBETA*( 2 , 5 ) produces 6BETA which is 
considered a character string, not a varia¬ 
ble symbol. 


Two apostrophes must be used to rep¬ 
resent a apostrophe that is part of a char- SUBSTRING NOTATION 
acter expression. 

The following statement assigns the 
character value L*SYMBOL to the SETC symbol 
6 LENGTH. 
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The character value assigned to a SETC 
symbol may be a substring character value. 
Substring character values permit the pro- 





















grammer to assign part of a character value 
to a SETC symbol. 

If the programmer wants to assign part 
of a character value to a SETC symbol, he 
must indicate to the assembler in the oper¬ 
and of a SETC instruction: (1) the charac¬ 
ter value itself, and ( 2 ) the part of the 
character value he wants to assign to the 
SETC symbol. The concatenation of (1) and 
(2) in the operand of a SETC instruction is 
called a substring notation. The character 
value that is assigned to the SeTc symbol 
in the name entry is called a substring 
character value- 

Substring notation consists of a charac¬ 
ter expression, immediately followed by two 
arithmetic expressions that are separated 
from each other by a comma and are enclosed 
in parentheses. These parentheses count 
when determining the number of levels of 
parentheses. The two arithmetic expres¬ 
sions may be any expression that is allowed 
in the operand of a SETA instruction. 

The first expression indicates the first 
character (in the character expression) 
that is to be assigned to the SETC symbol 
in the name entry. The second expression 
indicates the number of consecutive charac¬ 
ters in the character expression (starting 
with the character indicated by the first 
expression) that are to be assigned to the 
SETC symbol, if a substring specifies more 
characters than are in the character 
string, the number of available characters 
will be supplied. 

The maximum size character expression 
the substring character value can be chosen 
from is 127 characters. 

The following are valid substring nota¬ 
tions : 


• 6 ALPHA*(2,5) 

*AB%4* (£ AREA-*- 2,1) 

• 6 ALPHA*.*RST* ( 6 , 6 A) 
'ABCSGAMMA*(6A,6AREA*2) 


The following are invalid substring 
notations: 

• 6 BETA* (4,6) 

(blanks between character value 
and arithmetic expressions) 

*L''SYMBOL* (142-6XYZ) 

(only one arithmetic expression) 
*AB%46ALPHA*(8 6FIELD*2) 

(arithmetic expressions 
not separated by a comma) 
•BETA*4,6 

(arithmetic expressions 

not enclosed in parentheses) 

* 6 ALPHA*(2,4)(1,1) 


(double substring notation is not 
permitted) 


CONCATENATING SUBSTRING NOTATIONS AMD CHAR¬ 
ACTER EXPRESSIONS: Substring notations may 
be concatenated with character expressions 
in the operand of a SETC instruction. If a 
substring notation follows a character 
expression, the two may be concatenated by 
placing a period between the terminating 
apostrophe of the character expression and 
the opening apostrophe of the substring 
notation. 


For example, if £ ALPHA has been assigned 
the character value AB%4, and 6 BETA has 
been assigned the character value ABCDEF, 
then the following statement assigns 6 GAMMA 
the character value ABX4BCD. 


(Name {Operation {Operand ] 

|~ 6 GAMMA |SETC |* £ALPHA *.* 6 BETA*(2,3) ] 


If a substring notation precedes a char¬ 
acter expression or another substring nota¬ 
tion, the two may be concatenated by writ¬ 
ing the opening apostrophe of the second 
item immediately after the closing paren¬ 
thesis of the substring notation. 

The programmer may optionally place a 
period between the closing parenthesis of a 
substring notation and the opening apos¬ 
trophe of the next item in the operand. 

If £ALPHA has been assigned the charac¬ 
ter value ABX4, and 6 ABC has been assigned 
the character value 5RS, either of the 
following statements may be used to assign 
6W0RD the character value ABX45RS. 


{Name {Operation]Operand { 

^£WORD {SETC |* 6 ALPHA*(1,4)* 6 ABC* { 

j 6WORD J SETC j * 6ALPHA*(1,4)* £ABC' (1,3)j 


If a SETC symbol is used in the operand 
of a SETA instruction, the character value 
assigned to the SETC symbol must be one to 
eight decimal digits. 

If a SETA symbol is used in the operand 
of a SETC statement, the arithmetic value 
is converted to an unsigned integer with 
leading zeros removed. If the value is 
zero, it is converted to a single zero. 
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Using SETC Symbols 


The character value assigned to a SETC 
symbol is substituted for the SETC symbol 
when it is used in the name, operation, or 
operand of a statement. 


statement 2. Statement 3 assigns the char¬ 
acter value AREA to 6 PREFIX. Therefore, 
SPREFIX is replaced by AREA, instead of 
FIELD, in statement 4. 

The following example illustrates the 
use of a substring notation as the operand 
field of a SETC instruction. 


For example, consider 

the following 


T~ - 

— r -- - - 



macro-definition, macro- 

instruction, and 


| Name 

{Operation 

j Operand 

1 

generated 

statements. 



j- 

-■j-- 


4 

,- 

— T - 


~1 

1 

|MACRO 

1 


(Name 

jOperation 

|Operand 

1 

|£NAME 

| MOVE 

j £TO,£FROM 


- 

—1 - 

-)--- 

-4 

1 

j LCLC 

|£PREFIX 


1 

|MACRO 

1 

1 

1 j £PREFIX 

j SETC 

j *£TO # (1,5) 


j 6NAME 

J MOVE 

j £TO,£FROM 

1 

6 NAME 

|ST 

j2,SAVEAREA 


1 

|LCLC 

|£PREFIX 

1 

2 1 

II* 

j2,£PREFIX£FROM 


1 |£PREFIX 

j SETC 

j*FIELD* 

1 

1 

|ST 

j 2,£TO 


j £NAME 

ST 

j2,SAVEAREA 

1 

1 

11 * 

J2,SAVEAREA 


2 | 

II* 

j 2,€PREFIX£FROM 

1 

1 

|MEND 

1 


3 ! 

j ST 

|2,£PREFIX£TO 

1 

|- 


4 -- — - 

-4 

1 

II* 

|2,SAVEAREA 

1 

{HERE 

j MOVE 

jFIELDA,B 


1 

|MEND 

1 

1 

J—-—- 

4- 

—• ———— 

-4 

|-—— 

—-1 - 


-4 

| HERE 

|ST 

j 2,SAVEAREA 


| HERE 

| MOVE 

1 A, B 

1 

1 

II* 

|2,FIELDB 


|- 

—- 

|- 

-4 

1 

1ST 

j 2,FIELDA 


| HERE 

|ST 

j2,SAVEAREA 

1 

1 

II* 

j2,SAVEAREA 


1 

II* 

|2,FIELDB 

1 

L- 


—X—--—- 

.j 

1 

|ST 

j 2,FIELDA 

1 





! 

|L 

2,SAVEAREA 

1 






—JL- 1- - 


Statement 1 assigns 

the substring char- 



acter value FIELD (the first five charac- 


Statement 1 assigns the character value 
FIELD to the SETC symbol 6 PREFIX. In 
statements 2 and 3, &PREFIX is replaced by 


ters corresponding to symbolic parameter 
6 TO) to the SETC symbol 6 PREFIX. There¬ 
fore, FIELD replaces £PREFIX in statement 
2 . 


FIELD. 


The following example shows how the 
value assigned to a SETC symbol may be 
changed in a macro-definition. 


Name 


£NAME 

£PREFIX 
£NAME 

£PREFIX 


jOperation 

4- 


jMACRO 

(move 

| LCLC 
j SETC 
|ST 
11 * 

| SETC 
|ST 

II* 

| MEND 



Operand 


-4 


£T0,£FROM 
£PREFIX 
•FIELD' 

2,SAVEAREA 
2,£PREFIX£FROM 
•AREA' 

2,£PREFIX£TO 
2,SAVEAREA 


4- 




A, B 


2,SAVEAREA 
2,FIELDB 
2,AREAA 
2,SAVEAREA 


-J 


Statement 1 assigns the character value 
FIELD to the SETC symbol £PREFIX. There¬ 
fore, £PREFIX is replaced by FIELD in 


SETB — SET BINARY 


The SETB instruction may be used to assign 
the binary value 0 or 1 to a SETB symbol. 
The form of this instruction is: 


(Name 


|A SETB jsETB 
jsymbol j 

1 I 

I i 


j Operation! Operand 


|A 0 or a 1 ,( 0 ) or ( 1 ),| 
I or a logical ex- j 
|pression enclosed in j 
j parentheses j 


The operand may contain a 0 or a 1 or a 
logical expression enclosed in parentheses. 
(No explicit binary zeros or ones are 
allowed in parentheses other than in the 
form (0) or (1).) A logical expression is 
evaluated to determine if it is true or 
false; the SETB symbol in the name entry is 
then assigned the binary value 1 or 0 cor¬ 
responding to true or false, respectively. 
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Note : The parentheses enclosing a logi¬ 

cal expression do not count towards the 
parenthesis level limit. 

A logical expression consists of one 
term or a logical combination of terms. 

The terms that may be used alone or in 
combination with each other are arithmetic 
relations, character relations, and SETB 
symbols. The logical operators used to 
combine the terms of an expression are AND, 
OR, and NOT. 

A logical expression may not contain two 
terms in succession. A logical expression 
may contain two operators in succession 
only if the first operator is either AND or 
OR and the second operator is NOT. A logi¬ 
cal expression may begin with the operator 
NOT. It may not begin with the operators 
AND or OR. 

An arithmetic relation consists of two 
arithmetic expressions connected by a rela¬ 
tional operator. A character relation 
consists of two character strings connected 
by a relational operator. The relational 
operators are EQ (equal), NE (not equal), 

LT (less than), GT (greater than), LE (less 
than or equal), and GE (greater than or 
equal). 

Any expression that may be used in the 
operand of a SETA instruction, may be used 
as an arithmetic expression in the operand 
of a SETB instruction. Anything that may 
be used in the operand of a SETC instruc¬ 
tion, may be used as a character string in 
the operand of a SETB instruction. This 
includes substring and type attribute nota¬ 
tions. The maximum size of the character 
values that can be compared is 127 charac¬ 
ters. If the two character values are of 
unequal length, then the shorter one will 
always compare less than the longer one, 
regardless of the characters present. 

The relational and logical operators 
must be immediately preceded and followed 
by at least one blank or other special 
character. Each relation may or may not be 
enclosed in parentheses. If a relation is 
not enclosed in parentheses, it must be 
separated from the logical operators by at 
least one blank or other special character. 

A relation enclosed in parentheses must 
not be separated from the parentheses by 
any blanks. 

The following are valid operand fields 
of SETB instructions: 

1 

(SAREA+2 GT 29) 

(* AB%4* EQ '&ALPHA') 

(T'6ABC NE T'SXYZ) 

(T’SP12 EQ 'F') 


(&AREA+2 GT 29 OR 6B) 

(NOT £B AND €AREA+X’2D' GT 29) 
(* SC'EQ'MB*) 


The following are invalid operand fields 
of SETB instructions: 

SB (not enclosed in parentheses) 

(T* SP12 EQ * F* SB) 

(two terms in succession) 

(* AB%4 * EQ 'ALPHA' NOT SB) 

(the NOT operator must be 
preceded by AND or OR) 

(AND T * 6P12 EQ *F') 

(expression begins with AND) 


Evaluation of Logical Expressions 


The following procedure is used to evaluate 
a logical expression in the operand field 
of a SETB instruction: 

1. Each term (i.e., arithmetic relation, 
character relation, or SETB symbol) is 
evaluated and given its logical value 
(true or false). 

2. The logical operations are performed 
moving from left to right. However, 
NOTs are performed before ANDs, and 
ANDs are performed before ORs. 

3. The computed result is the value 
assigned to the SETB symbol in the 
name field. 

The logical expression in the operand of 
a SETB instruction may contain one or more 
sequences of logically combined terms that 
are enclosed in parentheses. A sequence of 
parenthesized terms may appear within 
another parenthesized sequence. 

The following are examples of SETB 
instruction operands that contain parenthe¬ 
sized sequences of terms. 

(NOT(SB AND SAREA+X'2D' GT29)) 

(SB AND(T* 6P12 EQ'F'OR&B) 

The parenthesized portion or portions of 
a logical expression are evaluated before 
the rest of the terms in the expression are 
evaluated. If a sequence of parenthesized 
terms appears within another parenthesized 
sequence, the innermost sequence is evalu¬ 
ated first. 

Logical expressions may have only five 
levels of parentheses. Subscripting, 
substring notation, and logical expression 
nesting count when determining the level of 
parentheses. The parentheses surrounding 
the SETB operand do not count. A counter 
is maintained for each statement and is 
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increased by one for each occurrence of a the character value 0 is substituted for 

variable symbol and an operation entry. 6B2 in statement 4. 

The maximum value this counter may attain 
is 35. See Ap pend ix H. 


Using SETB Sym bols 


The logical value assigned to a SETB symbol 
is used for the SETB symbol appearing in 
the operand of an AIF instruction or anoth¬ 
er SETB instruction. 

If a SETB symbol is used in the operand 
of a SETA instruction, or in arithmetic 
relations in the operands of AIF and SETB 
instructions, the binary values 1 (true) 
and 0 (false) are converted to the arith¬ 
metic values +1 and +0, respectively. 

If a SETB symbol is used in the operand 
of a SETS instruction, in character rela¬ 
tions in the operands of AIF and SETB 
instructions, or in any other statement, 
the binary values 1 (true) and 0 (false), 
are converted to the character values 1 and 
0, respectively. 

The following example illustrates these 
rules. It is assumed that L* &TO EQ 4 is 
true, and S*6T0 EQ 0 is false. 


1 

2 

3 

4 


|Name (Operation jOperand 

f- + - + - 


&NAME 


6B1 

&B2 

SA1 

SCI 


MACRO 

MOVE 

LCLA 

LCLB 

LCLC 

SETB 

SETB 

SETA 

SETC 

ST 

L 

ST 

L 

MEND 


&TO,6FROM 
6A1 

6B1,6B2 
SCI 

(L f 6TO EQ 4) 
(S'&TO EQ 0) 
&B1 
*6B2* 

2,SAVEAREA 
2, 6FROM&A1 
2,&T0&C1 
2, SAVEAREA 


HERE 

HERE 


MOVE 


FIELDA,FIELDB 


ST 

L 

ST 

L 


2,SAVEAREA 
2,FIELDB1 
2,FIELDAO 
2,SAVEAREA 


Because the operand of statement 1 is 
true, 6B1 is assigned the binary value 1. 
Therefore, the arithmetic value +1 is sub¬ 
stituted for &B1 in statement 3. Because 
the operand of statement 2 is false, €B2 is 
assigned the binary value 0. Therefore, 


AIF — CONDITIONAL BRANCH 


The AIF instruction is used to alter condi¬ 
tionally the sequence in which source pro¬ 
gram statements are processed by the assem¬ 
bler. The typical form of this instruction 
is: 


| A se- 
j quence 
|symbol or| 
(not used | 


(AIF 


Name jOperationjOperand | 

|A logical expression 
|enclosed in paren- 
]theses, immediately 
(followed by a 
]sequence symbol 
— x _ 


Any logical expression that may be used 
in the operand of a SETB instruction may be 
used in the operand of an AIF instruction. 
However, the forms 

AIF (0), sequence symbol and 

AIF (1), sequence symbol 

are invalid. The sequence symbol in the 
operand must immediately follow the closing 
parenthesis of the logical expression. AIF 
operand entries must not contain explicit 
zeros or ones. 

Note : The parentheses enclosing the 
logical expression do not count toward the 
level limit. 

The logical expression in the operand is 
evaluated to determine if it is true or 
false. If the expression is true, the 
statement named by the sequence symbol in 
the operand is the next statement processed 
by the assembler; however, sequence check¬ 
ing is not affected. If the expression is 
false, the next sequential statement is 
processed by the assembler. 

The statement named by the sequence 
symbol may precede or follow the AIF 
instruction. 

If an AIF instruction is in a macro¬ 
definition, then the sequence symbol in the 
operand must appear in the name entry of a 
statement in the definition. If an AIF 
instruction appears outside macro¬ 
definitions, then the sequence symbol in 
the operand must appear in the name entry 
of a statement outside macro-definitions. 

The following are valid operands of AIF 
instructions: 
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(SAREA+X* 2D* GT 29).READER 
(T* SP12 EQ *F').THERE 


The following are invalid operands of 
AIF instructions: 


(T'SABC NE T'SXYZ) (no sequence symbol) 

.X4F2 (no logical expression) 

(T* SABC NE T* SXYZ) . X4F2 

(blanks between logical 
expression and se¬ 
quence symbol) 

The following macro-definition may be 
used to generate the statements needed to 
move a full-word fixed-point number from 
one storage area to another. The 
statements will be generated only if the 
type attribute of both storage areas is the 
letter F. 


AGO — UNCONDITIONAL BRANCH 


The AGO instruction is used to uncondi¬ 
tionally alter the sequence in which source 
program statements are processed by the 
assembler. The typical form of this 
instruction is: 


i- r -r-1 

(Name (Operation! Operand I 

(A sequence(AGO (A sequence symbol J 

|symbol or j j | 

(not used j j j 

«- —I-L___J 


The statement named by the sequence 
symbol in the operand is the next statement 
processed by the assembler. 


Name 


Joperationjoperand 




The statement named by the sequence 
symbol may precede or follow the AGO 
instruction. 



1 

(MACRO 

1 

1 

If an AGO instruction is part of a 


j SN 

(MOVE 

|ST,SF 

1 

macro-definition, then the sequence symbol 

1 

1 

(AIF 

((T* ST NE T* 6F).END 

1 

in the operand must appear in the name 

2 

1 

(AIF 

|(T* ST NE * F * ) .END 

1 

entry of a statement that is in that defi- 

3 

j SN 

ST 

j 2,SAVEAREA 

1 

nition. If an AGO instruction appears 


! 

|L 

|2,6F 

I 

outside macro-definitions, then the 


1 

| ST 

(2, ST 

1 

sequence symbol in the operand must appear 


1 

lb 

(2,SAVEAREA 

1 

in the name entry of a statement outside 

4 

j .END 

(MEND 

1 

—L - _ 

_J 

macro-definitions. 


The logical expression in the operand of 
statement 1 has the value true if the type 
attributes of the two macro-instruction 
operands are not equal. If the type attri¬ 
butes are equal, the expression has the 
logical value false. 

Therefore, if the type attributes are 
not equal, statement 4 (the statement named 
by the sequence symbol -END) is the next 
statement processed by the assembler. If 
the type attributes are equal, statement 2 
(the next sequential statement) is proc¬ 
essed. 

The logical expression in the operand of 
statement 2 has the value true if the type 
attribute of the first macro-instruction 
operand is not the letter F. If the type 
attribute is the letter F, the expression 
has the logical value false. 

Therefore, if the type attribute is not 
the letter F, statement 4 (the statement 
named by the sequence symbol .END) is the 
next statement processed by the assembler. 
If the type attribute is the letter F, 
statement 3 (the next sequential statement) 
is processed. 


The following example illustrates the 
use of the AGO instruction. 



r- 


*“ .m n»> — — '■»' —* — — — -r. IUI >11 -II II .1-1 1- 

-T 


j Name 

L_ 

jOperation| Operand 

1 

-^ 

1 


r — 

1 

(MACRO 

i 


|6NAME 

(MOVE 

1ST,SF 

1 

1 

1 

(AIF 

( (T* ST EQ 'F* ).FIRST ( 

2 

1 

(AGO 

( .END 

1 

3 

|.FIRST(AIF 

J (T* ST NE T*6F).END 



|6NAME 

(ST 

(2,SAVEAREA 



1 

»b 

I 2, SF 



1 

(ST 

( 2, ST 



1 

lb 

(2,SAVEAREA 


4 

(.END 

(MEND 

1 



1 - 

—JL- 

-L- 

--^ 


Statement 1 

is used to determine if 

the 


type attribute of the first macro¬ 
instruction operand is the letter F. If 
the type attribute is the letter F, 
statement 3 is the next statement processed 
by the assembler. If the type attribute is 
not the letter F, statement 2 is the next 
statement processed by the assembler. 

Statement 2 is used to indicate to the 
assembler that the next statement to be 
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processed is statement 4 (the statement 
named by sequence symbol .END). 


The typical form of this instruction is 


ACTR — CONDITIONAL ASSEMBLY LOOP COUNTER 


r-T--T-1 

|Name |Operation JOperand 1 

] A se- JANOP |Not used, must not j 

j quence j |be present j 

{symbol j ) j 


The ACTR instruction is used to limit the 
number of AGO and AIF branches executed 
within a macro-definition or within the 
main source program. 


A separate ACTR statement may be used in 
each macro-definition and in the main pro¬ 
gram. These counters are independent- 


The form of this instruction is: 


|Name |Operation |Operand | 

fliot used | ACTR |Any valid SETA ! 

jmust not j {expression f 

j be present j j j 


This statement must immediately follow 
any global or local declarations, if any. 
This statement causes a counter to be set 
to the value in its operand. Each time an 
AGO or AIF branch is executed, the counter 
is decremented by one. If the count is 
zero before decrementing, the assembler 
takes one of two actions: 

1. If a macro definition is being proc¬ 
essed, the processing of it and any macros 
above it in a nest is terminated, and the 
next statement in the main portion of the 
program is processed. 

2. If the main portion of the program is 
being processed, conditional assembly is 
terminated, and the portion of the program 
generated so far is assembled. 

If an ACTR statement is not given, the 
assumed value of the counter is 150. 


ANOP — ASSEMBLY NO OPERATION 


The ANOP instruction facilitates condi¬ 
tional and unconditional branching to 
statements named by symbols or variable 
symbols. 


If the programmer wants to use an AIF or 
AGO instruction to branch to another state¬ 
ment, he must place a sequence symbol in 
the name entry of the statement to which he 
wants to branch. However, if the program¬ 
mer has already entered a symbol or varia¬ 
ble symbol in the name entry of that state¬ 
ment, he cannot place a sequence symbol in 
the name entry. Instead, the programmer 
must place an ANOP instruction before the 
statement and then branch to the ANOP 
instruction. This has the same effect as 
branching to the statement immediately 
after the ANOP instruction. 

The following example illustrates the 
use of the ANOP instruction. 


| Name 
|- 

(NAME 


6 TYPE 
.FTYPE 
6 NAME 


(Operation (Operand 


(MACRO 

[move 

(LCLC 
jAIF 
jsETC 
jANOP 
J STSTYPE 
JL6TYPE 
j STSTYPE 
1LSTYPE 
(MEND 
-X 


j ST,6F 
| 6TYPE 
j(T*ST 

{* e* 


EQ * F*).FTYPE 


j 2 , SAVEAREA 
I 2 , SF 
j 2,ST 

{2,SAVEAREA 

I 

JL. 


t-L—-L_J 


Statement 1 is used to determine if the 
type attribute of the first macro¬ 
instruction operand is the letter F. If 
the type attribute is not the letter F, 
statement 2 is the next statement processed 
by the assembler. If the type attribute is 
the letter F, statement 4 should be 
processed next. However, since there is a 
variable symbol (SNAME) in the name field 
of statement 4, the required sequence sym¬ 
bol (.FTYPE) cannot be placed in the name 
field. Therefore, an ANOP instruction 
(statement 3) must be placed before state¬ 
ment 4. 


Then, if the type attribute of the first 
operand is the letter F, the next statement 
processed by the assembler is the statement 
named by sequence symbol -FTYPE. The value 
of STYPE retains its initial null character 
value because the SETC instruction is not 
processed. Since -FTYPE names an ANOP 
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instruction, the next statement processed 
by the assembler is statement 4, the state¬ 
ment following the ANOP instruction. 


CONDITIONAL ASSEMBLY ELEMENTS 


The intersection of a column and a row 
indicates whether an element can be used in 
an instruction, and if so, in what fields 
of the instruction the element can be used. 
For example, the intersection of the first 
row and the first column of the chart indi¬ 
cates that symbolic parameters can be used 
in the operand field of SETA instructions. 


The following chart summarizes the elements 
that can be used in each conditional assem¬ 
bly instruction. Each row in this chart 
indicates which elements can be used in a 
single conditional assembly instruction. 
Each column is used to indicate the condi¬ 
tional assembly instructions in which a 
particular element can be used. 


I- [ -+-+--I-+-+-+-+- A -+-+- A 


S.P. 

SETA 


SETB 


I- 

SETC 

I-+ 

AIF 

1 - 

AGO 

j-t 


ANOP 


ACTR 


Variable Symbols 
SET Symbols 


O 


+-f 


SETA | SETB | SETC 


-+-r 


N,0 


N,0 


H-+—- + -+-+— 


O 3 


+-1-+-+--I-+--1- A 


N, 0 


O 3 


Attributes 


T' I L' I S' I I' I K' I N* 


»-r 


S.S. 


O 1 


0 


O 1 




o* 


0 a 


A -+-*1-+-+--I-+ 


0 a 


O a 




•I-+- A -+-+-+-+-+ 


o a 


o a 


o a 


o a 


0 a 


0 a 
+— 




A — 


N,0 

—A 

N,0 


N 




j 1 Only in character relations j 
j a Only in arithmetic relations j 
| 3 Only if one to eight decimal digits j 

| Abbreviations j 

j N is Name L* is Length Attribute K* is Count Attribute | 
| 0 is Operand S* is Scaling Attribute N* is Number Attribute j 
j S.P. is Symbolic I* is Integer Attribute S.S. is Sequence Symbol j 
j Parameter 1 


Writing Conditional Assembly Instructions 85 

















Form C24-3414-2, -3, -4 
Page Revised 4/26/67 
By TNL N26-0536 

SECTION 10: ADDITIONAL FEATURES 


The additional features of the assembler 
language allow the programmer to: 

1. Terminate processing of a macro- 
definition. 

2. Generate error messages. 

3. Define global SET symbols. 

4. Define subscripted SET symbols. 

5. Use system variable symbols. 

6 . Prepare keyword and mixed-mode macro¬ 
definitions and write keyword and 
mixed-mode macro-instructions. 



|“ " “ 

~T-- 

"T ——— 1 ———————— 

”— “ “ 1 


| Name 

i 

(Operation 

j 

|Operand 

1 

j 


j MACRO 


( 6 NAME 

(MOVE 

| 6 T, 6 F 


1 

I 

j AIF 

( (T* 6 T EQ * F* ) . 

OK | 

2 

i 

(MEXIT 

1 


3 

| -OK 

j ANOP 

1 



j SNAME 

ST 

| 2 , SAVEAREA 



1 

IL 

|2,€F 



1 

ST 

|2,6T 



1 

| L 

|2, SAVEAREA 



1 

i__ 

(MEND 

1 

_J 


MEXIT — MACRO-DEFINITION EXIT 


The MEXIT instruction is used to indicate 
to the assembler that it should terminate 
processing of a macro-definition. The 
typical form of this instruction is: 


(Name |Operation (Operand | 

|A sequence (MEXIT |Not used, j 
(symbol or j (must not be j 
|not used j jpresent 1 


The MEXIT instruction may only be used 
in a macro-definition. 

If the assembler processes an MEXIT 
instruction that is in a macro-definition 
corresponding to an outer macro¬ 
instruction, the next statement processed 
by the assembler is the next statement 
outside macro-definitions- 

If the assembler processes an MEXIT 
instruction that is in a macro-definition 
corresponding to a second or third level 
macro-instruction, the next statement proc¬ 
essed by the assembler is the next state¬ 
ment after the second or third level macro¬ 
instruction in the macro-definition, 
respectively. 

MEXIT should not be confused with MEND. 
MEND indicates the end of a macro¬ 
definition. MEND must be the last 
statement of every macro-definition, 
including those that contain one or more 
MEXIT instructions. 

The following example illustrates the 
use of the MEXIT instruction. 


Statement 1 is used to determine if the 
type attribute of the first macro- 
instruction operand is the letter F. If 
the type attribute is the letter F, the 
assembler processes the remainder of the 
macro-definition starting with statement 3. 
If the type attribute is not the letter F, 
the next statement processed by the 
assembler is statement 2. Statement 2 
indicates to the assembler that it is to 
terminate processing of the macro¬ 
definition. 


MNQTE STATEMENT 


The MNOTE instruction may be used to generate 
a message and to indicate what error severity 
code, if any, is to be associated with the 
message. The severity code is for the 
programmer's information only and is not 
used by the DOS assembler or control pro¬ 
gram. The typical form of this instruction 
is : 

I-1-T-1 

(Name |Operation|Operand | 

H-•(-+-•( 

(A sequence(MNOTE |See examples below, j 
(symbol or j j | 

(not used | j j 

The operand entry of the MNOTE 
assembler-instruction may be written in one 
of the following forms: 

1 . severity-code,'message* 

2 . ,* message* 

3- 'message* 

For 2 and 3 above, the severity code is 
assumed to be one. 
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The MNOTE instruction may only be used 
in a macro-definition. Variable symbols 
may be used to generate the MNOTE mnemonic 
operation code, the severity code 
indicator, and the message. 

The resulting severity code indicator 
may be a decimal integer 0 to 255, blank, 
or an asterisk. The integers indicate the 
severity of the error. (0 is the least 
severe; 255 is the most severe). If the 
severity code indicator is blank or omit¬ 
ted, 1 is assumed. If the severity code is 
an asterisk, the MNOTE is not considered an 
error message, and the message is consid¬ 
ered a comment. Messages can be generated 
with substitution using variable symbols. 

The MNOTE statement appears in the list¬ 
ing with a statement number at the point 
where it was generated- If the severity 
code indicator was an integer or a blank, 
this statement number is placed in a list 
of statement numbers of MNOTE and other 
error statements near the end of the assem¬ 
bly listing. If the severity code is an 
asterisk, the statement number is not 
placed in this list. 

Since the message portion of the MNOTE 
operand is enclosed in apostrophes, two 
apostrophes must be used to represent a 
single apostrophe. Any variable symbols 
used in the message operand are replaced by 
values assigned to them. Two ampersands 
must be used to represent a single amper¬ 
sand that is not part of a variable symbol. 

The following example illustrates the 
use of the MNOTE instruction. 


|Name |Operation|operand j 



1 

1MACRO 

1 

—1 


|SNAME|MOVE 

|ST,SF 


1 

1 

| AIF 

j(T* ST NE T* 6 F).Ml 


2 

1 

IAIF 

j(T* 6 T NE *F*).M2 


3 

6 NAME ST 

j 2,SAVEAREA 



1 

II* 

12, SF 



I 

1ST 

| 2, ST 



1 

II* 

j 2,SAVEAREA 


4 

1 

| MNOTE 

j *,* MOVE GENERATED* 



I 

JMEXIT 

1 


5 

| .Ml 

j MNOTE 

j 8 ,* TYPE NOT SAME* 



1 

IMEXIT 

1 


6 

1 .M2 

jMNOTE 

| 8 ,*TYPE NOT F* 



1 

j MEND 

1 




_ 1 __ 

J_ _ _ _ 

_ J 


Statement 1 is used to determine if the 
type attributes of both macro-instruction 
operands are the same. If they are, state¬ 
ment 2 is the next statement processed by 
the assembler. If they are not, statement 
5 is the next statement processed by the 


assembler. Statement 5 causes an error 
message — 8 ,TYPE NOT SAME — to be printed 
in the source program listing. 

Statement 2 is used to determine if the 
type attribute of the first macro¬ 
instruction operand is the letter F. If 
the type attribute is the letter F, 
statement 3 is the next statement processed 
by the assembler. If the attribute is not 
the letter F, statement 6 is the next 
statement processed by the assembler. 
Statement 6 causes an error message — 

8 ,TYPE NOT F — to be printed in the source 
program listing. Statement 4 is an MNOTE 
which is not treated as an error message. 


GLOBAL AND LOCAL VARIABLE SYMBOLS 


The following are local variable symbols: 

1. Symbolic parameters. 

2. Local SET symbols. 

3. System variable symbols. 

Global SET symbols are the only global 
variable symbols. 

The GBLA, GBLB, and GBLC instructions 
define global SET symbols, just as the 
LOLA, LCLB, and LCLC instructions define 
the SET symbols described in Section 9. 
Hereinafter, SET symbols defined by LOLA, 
LCLB, and LCLC instructions will be called 
local SET symbols. 

Global SET symbols may communicate 
values between statements in one or more 
macro-definitions and statements outside 
macro-definitions. However, local SET 
symbols communicate values between state¬ 
ments in the same macro-definition, or 
between statements outside macro¬ 
definitions. 

If a local SET symbol is defined in two 
or more macro-definitions, or in a macro¬ 
definition and outside macro-definitions, 
the SET symbol is considered to be a 
different SET symbol in each case. Howev¬ 
er, a global SET symbol is the same SET 
symbol each place it is defined. 

A SET symbol must be defined as a global 
SET symbol in each macro-definition in 
which it is to be used as a global SET 
symbol. A SET symbol must be defined as a 
global SET symbol outside macro¬ 
definitions, if it is to be used as a glo¬ 
bal SET symbol outside macro-definitions. 

If the same SET symbol is defined as a 
global SET symbol in one or more places, 
and as a local SET symbol elsewhere, it is 
considered the same symbol wherever it is 
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defined as a global SET symbol, and a dif¬ 
ferent symbol wherever it is defined as a 
local SET symbol. 


Defining Local and Global SET Symbols 


Local SET symbols are defined when they 
appear in the operand entry of an LCLA, 
LCLB, or LCLC instruction- These instruc¬ 
tions are discussed in Section 9 under 
Defining SET Symbols . 

Global SET symbols are defined when they 
appear in the operand entry of a GBLA, 

GBLB, or GBLC instruction. The typical 
forms of these instructions are: 


Using Global and Local SET Symbols 


The following examples illustrate the use 
of global and local SET symbols. Each 
example consists of two parts. The first 
part is an assembler language source pro¬ 
gram. The second part shows the statements 
that would be generated by the assembler 
after it processed the statements in the 
source program. 


Example 1: This example illustrates how 
the same SET symbol can be used to communi 
cate ( 1 ) values between statements in the 
same macro-definitions, and ( 2 ) different 
values between statements outside macro¬ 
definitions. 


|Name I 

Operation 

r 

Operand | 


r __ 

_ 

_ T -- 

-j 


— 

— 

- 

- 4 


J Name 

jOperation 

|Operand 

i 

1 Not used, j 

GBLA, 



One or more J 


Y - 

---}-- 

-- 

-1 

jmust not j 

GBLB, or 



variable j 


1 

(macro 

1 


j be present j 

GBLC 



symbols that 1 


j 6NAME 

j L0ADA 

1 


1 1 




are to be used j 

1 

1 

j LCLA 

| SA 


1 1 




as global SET | 

2 

j 6NAME 

| LR 

|15,SA 


1 I 




symbols, sepa- j 

3 

j SA 

(seta 

| SA+1 


1 ! 




rated by commas j 


1 

j MEND 

1 



—- 

J 

L. 

- ——-j 


1 

1 

1 







4 

1 

j LCLA 

|SA 








j FIRST 

(loada 

1 


The GBLA, GBLB, and 

GBLC instructions 

5 

i 

(lr 

J15,SA 


define global 

SETA, SETB, 


and SETC symbols. 


1 

j LOADA 

1 


respectively, 

and assign 

the same initial 

6 

1 

(lr 

j15,SA 


values as the corresponding types of local 


1 

JEND 

j FIRST 


SET symbols. 

However, 

a 

global SET symbol 


Y - 

--j - 

-+- 

- 4 

is assigned an initial 

value by only the 


J FIRST 

|LR 

1 15, 0 


first GBLA, GBLB, or GBLC 

instruction proc- 


1 

| LR 

115, 0 


essed in which the symbol 

appears. Subse- 


1 

(lr 

115,0 


quent GBLA, GBLB, or GBLC 

instructions 


1 

|LR 

115, 0 


processed by the assembler do not affect 


1 

(end 

|FIRST 



the value assigned to the SET symbol. *■-J--1-J 


The programmer should not define any 
global SET symbols whose first four charac¬ 
ters are 6 SYS. 

If a GBLA, GBLB, or GBLC instruction is 
part of a macro-definition, it must immedi¬ 
ately follow the prototype statement, or 
another GBLA, GBLB, or GBLC instruction. 
GBLA, GBLB, and GBLC instructions outside 
macro-definitions must appear after all 
macro-definitions in the source program, 
before all conditional assembly instruc¬ 
tions and PUNCH and REPRO statements out¬ 
side macro-definitions, and before the 
first control section of the program. 

All GBLA, GBLB, and GBLC instructions in 
a macro-definition must appear before all 
LCLA, LCLB, and LCLC instructions in that 
macro-definition. All GBLA, GBLB, and GBLC 
instructions outside macro-definitions must 
appear before all LCLA, LCLB, and LCLC 
instructions outside macro-definitions. 


SA is defined as a local SETA symbol in 
a macro-definition (statement 1 ) and 
outside macro-definitions (statement 4). 

SA is used twice within macro-definition 
(statements 2 and 3) and twice outside 
macro-definitions (statements 5 and 6 ). 

Since SA is a local SETA symbol in the 
macro-definition and outside macro¬ 
definitions, it is one SETA symbol in the 
macro-definition, and another SETA symbol 
outside macro-definitions. Therefore, 
statement 3 (which is in the 
macro-definition) does not affect the value 
used for SA in statements 5 and 6 (which 
are outside macro-definitions). 

Example 2: This example illustrates how a 
SET symbol can be used to communicate 
values between statements that are part of 
a macro-definition and statements outside 
macro-definitions. 
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| Name 

|Operation 

j Operand 
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| Name 

|Operation 

j Operand 
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j LOADA 
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j SNAME 
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j SETA 
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j SA 

j SETA 
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j MEND 
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jLOADA 
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1 

|LR 

115, 0 


SA is 

defined as a 

global SETA symbol 

in 


i 

JEND 

|FIRST 


a macro-definition (statement 1 ) and out- 



l _ _ 

—L_—-- 




side macro-definitions (statement 4). SA 
is used twice within the macro-definition 
(statements 2 and 3) and twice outside 


macro-definitions (statements 5 and 6 ). 


Since SA is a global SETA symbol in the 
macro-definition and outside macro¬ 
definitions, it is the same SETA symbol in 
both cases. Therefore, statement 3 (which 
is in the macro-definition) affects the 


Example 4: This example illustrates how a 
SET symbol can be used to communicate 
values between statements that are part of 
two different macro-definitions. 




value used for SA in statements 5 and 6 


|Name 

{Operation 

j Operand 

1 

(which are outside macro-definitions). 


i 

jSNAME 

|MACRO 
jLOADA 

1 

1 


Example 3: This example illustrates how 

1 

1 

(GBLA 

j SA 


the same SET symbol can be used to 

2 

|SNAME 

| LR 

{15,SA 


communicate: ( 1 ) values between statements 

3 

j SA 

| SETA 

j 6 A +1 


in one macro-definition, and ( 2 ) different 
values between statements in a different 


i 

1 

|MEND 

1 

1 

1 


macro-definition. 


1 

1 

|MACRO 
jLOADB 

1 

1 



4 

1 

(GBLA 

|SA 



5 

1 

|LR 

|15,SA 


SA is defined as a local SETA symbol in 

6 

|SA 

j SETA 

{6A+1 


two different macro-definitions (statements 

1 and 4). SA is used twice within each 


1 

1 

|MEND 

1 

1 

1 


macro-definition (statements 2,3,5 and 6 ). 


(FIRST 

1 

jLOADA 
|LOADB 

1 

1 


Since SA is a local SETA symbol in each 


1 

(LOADA 

1 


macro-definition, it is one SETA symbol in 


1 

(LOADB 

1 


one macro-definition, and another SETA 


1 

JEND 

j FIRST 


symbol in the other macro-definition. 


i- 

■j— — — 

-- 

- 1 

Therefore, statement 3 (which is in one 


|FIRST 

| LR 

|15,0 

macro-definition) does not affect the value 


1 

|LR 

115,1 


used for SA in statement 5 (which is in the 


1 

|LR 

115,2 


other macro-definition). Similarly, state- 


1 

|LR 

115, 3 


ment 6 does not affect the value used for 


1 

| END 

|FIRST 


SA in statement 2. 



—J-L- 

-4 
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(A is defined as a global SETA symbol in 
two different macro-definitions (statements 
1 and 4). £A is used twice within each 
macro-definition (statements 2,3,5, and 6 ). 


Since £A is a global SETA symbol in each 
macro*definition, it is the same SETA sym¬ 
bol in each macro-definition. Therefore, 
statement 3 (which is in one 
macro-definition) affects the value used 
for £A in statement 5 (which is in the 
other macro-definition). Similarly, state¬ 
ment 6 affects the value used for £A in 
statement 2 - 


Example 5; This example illustrates how 
the same SET symbol can be used to communi 
cate: ( 1 ) values between statements in two 
different macro-definitions, and ( 2 ) dif¬ 
ferent values between statements outside 
macro-definitions. 



| Name 

t 

| Operation 
[macro 

|Operand 

j 


r -- - 

1 

} 


j 6 NAME 

j LOADA 

1 


1 

1 

J GBLA 

j £A 


2 

| 6 NAME 

|LR 

|15,£A 


3 

1 £A 

j SETA 

j £A+1 



1 

|MEND 

j 

1 

l 



l 

1 

|MACRO 

J 

1 



1 

j LOADB 

1 


4 

1 

j GBLA 

j SA 


5 

1 

|LR 

|15,£A 


6 

j £A 

j SETA 

j £A+1 



1 

I 

j MEND 
« 

\ 
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7 

1 

1 

i 

j LCLA 

1 

ISA 



jFIRST 

j LOADA 

I 



1 

jLOADB 

i 


8 

1 

|LR 

|15,£A 



1 

ILOADA 

\ 



1 

1LOADB 

1 


9 

1 

JLR 

115,£A 



1 

(END 

| LR 

j FIRST 

l 

-_j 


|_ _ 

jFIRST 

1 . 

115, 0 


1 

j LR 

115,1 



1 

j LR 

|15,0 



1 

j LR 

115,2 



1 

| LR 

|15,3 



1 

j LR 

|15,0 



1 

j END 

_L _ 

j FIRST 

_J 


£A is defined as a global SETA symbol in 
two different macro-definitions (statements 
1 and 4), but it is defined as a local SETA 
symbol outside macro-definitions (statement 
7). SA is used twice within each macro¬ 
definition and twice outside macro¬ 
definitions (statements 2,3,5, 6 , 8 , and 9). 


Since £A is a global SETA symbol in each 
macro-definition, it is the same SETA 
symbol in each macro-definition. However, 
since £A is a local SETA symbol outside 
macro-definitions, it is a different SETA 
symbol outside macro-definitions. 

Therefore, statement 3 (which is in one 
macro-definition) affects the value used 
for £A in statement 5 (which is in the 
other macro-definition), but it does not 
affect the value used for £A in statements 
8 and 9 (which are outside 

macro-definitions). Similarly, statement 6 
affects the value used for £A in statement 
2 , but it does not affect the value used 
for £A in statements 8 and 9. 


Subscripted SET S^ 


Both global and local SET symbols may be 
defined as subscripted SET symbols. The 
local SET symbols defined in Section 9 were 
all nonsubscripted SET symbols. 

Subscripted SET symbols provide the 
programmer with a convenient way to use one 
SET symbol plus a subscript to refer to 
many arithmetic, binary, or character 
values. 

A subscripted SET symbol consists of a 
SET symbol immediately followed by a sub¬ 
script that is enclosed in parentheses. 

The subscript may be any arithmetic expres¬ 
sion that is allowed in the operand of a 
SETA statement in the range of 1 to the 
specified dimension. 

Only five levels of parentheses are 
permitted in a SETA or SETB operand. 

The following are valid subscripted SET 
symbols. 

£READER(17) 

&A23456(SS4) 

£X4F2(25+£A2) 

The following are invalid subscripted 
SET symbols. 

£X4F2 (no subscript) 

(25) (no SET symbol) 

£X4F2 (25) (subscript does not 

immediately follow 
SET symbol) 

Defining Subscripted SET Symbols: If the 
programmer wants to use a subscripted SET 
symbol, he must write in a GBLA, GBLB, 

GBLC, LOLA, LCLB, or LCLC instruction, a 
SET symbol immediately followed by an 
unsigned decimal integer enclosed in paren¬ 
theses. The decimal integer, called a 
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dimension, indicates the number of SET 
variables associated with the SET symbol. 
Every variable associated with a SET symbol 
is assigned an initial value that is the 
same as the initial value assigned to the 
corresponding type of nonsubcripted SET 
symbol. 

If a subscripted SET symbol is defined 
as global, the same dimension must be used 
with the SET symbol each time it is defined 
as global. 

The maximum dimension that can be used 
with a SETA, SETB, or SETC symbol is 255. 

A subscripted SET symbol may be used 
only if the declaration was subscripted. A 
nonsubscripted SET symbol may be used only 
if the declaration had no subscript. 


The following statements define the 
global SET symbols SSBOX, SWBOX, and SPSW, 
and the local SET symbol 6TSW. SSBOX has 
50 arithmetic variables associated with it, 
SWBOX has 20 character variables, SPSW and 
6 TSW each have 230 binary variables. 


|Name |Operation (Operand | 


I 

(GBLA 

(SSBOX(50) 

1 

j GBLC 

|SWBOX(20) 

1 

JGBLB 

(SPSWC230) 

1 

j LCLB 

(STSW(230> 


__ X _- 

— -J. _ - 


Using Subscripted SET Symbols; After the 
programmer has associated a number of SET 
variables with a SET symbol, he may assign 
values to each of the variables and use 
them in other statements. 


and STSW<9), respectively. Statements 4 
and 5 generate statements that add the 
value assigned to SSBOX(45) to general 
register 2, and compare the value assigned 
to SWBOX(17) to the value stored at AREA, 
respectively. 


SYSTEM VARIABLE SYMBOLS 


System variable symbols are local variable 
symbols that are assigned values automat¬ 
ically by the assembler. There are three 
system variable symbols: SSYSNDX, SSYSECT, 
and SSYSLIST. System variable symbols may 
be used in the name, operation and operand 
entries of statements in macro-definitions, 
but not in statements outside macro¬ 
definitions. They may not be defined as 
symbolic parameters or SET symbols, nor may 
they be assigned values by SETA, SETB, and 
SETC instructions. 


SSYSNDX — Macro-Instruction Index 


The system variable symbol SSYSNDX may be 
combined with other characters to create 
unique names for statements generated from 
the same model statement. 


SSYSNDX is assigned the four-digit 
number 0001 for the first macro-instruction 
processed by the assembler, and it is 
incremented by one for each subsequent 
inner and outer macro-instruction proc¬ 
essed. 


If the statements in the previous exam¬ 
ple were part of a macro-definition, (and 
6A was defined as a SETA symbol in the same 
definition), the following statements could 
be part of the same macro-definition. 


If SSYSNDX is used in a model statement, 
SETC or MNOTE instruction, or a character 
relation in a SETB or AIF instruction, the 
value substituted for SSYSNDX is the four¬ 
digit number of the macro-instruction being 
processed, including leading zeros. 


jName (Operation |Operand J 


1 

| SA 

(SETA 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

I 

1 

H 

2 

|SPSW(&A) 

(SETB 

( (6 LT 2) 


3 

j 6TSW(9) 

j SETB 

j(SPSW(SA)) 


4 

1 

| A 

j 2,=F* SSBOX(45)* 


5 

| 

jcLI 

j AREA,C* SWBOX(17) 

f | 

-J 


Statement 1 assigns the arithmetic value 
5 to the nonsubscripted SETA symbol 6A. 
Statements 2 and 3 then assign the binary 
value 0 to subscripted SETB symbols SPSW(5) 


If SSYSNDX appears in arithmetic 
expressions (e.g., in the operand of a SETA 
instruction), the value used for SSYSNDX is 
an arithmetic value. 

Throughout one use of a macro defini¬ 
tion, the value of SSYSNDX may be consid¬ 
ered a constant, independent of any inner 
macro-instruction in that definition . 

The example in the next column illus¬ 
trates these rules. It is assumed that the 
first macro-instruction processed, OUTER 1, 
is the 106th macro-instruction processed by 
the assembler. 
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Statement 7 is the 106th macro- 
instruction processed. Therefore, SSYSNDX 
is assigned the number 0106 for that macro- 
instruction. The number 0106 is 
substituted for SSYSNDX when it is used in 
statements 4 and 6. Statement 4 is used to 
assign the character value 0106 to the SETC 
symbol SNDXNUM. Statement 6 is used to 
create the unique name B0106. 

I-T-T-1 

|Name (Operation (Operand | 
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(MACRO 

1 

\ 

1 

|INNER1 
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1 

| GBLC 

j SNDXNUM 


1 (ASSYSNDX (SR 
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(CR 

(2,5 
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BE 
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(MEND 
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(MACRO 
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4 (SNDXNUM 

(SETC 

|'SSYSNDX* 
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j AR 
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6 |BSSYSNDX |S 

|2,=F*1000* 
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(MEND 
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|OUTERl 
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j AR 
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j SR 
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j BE 
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|S 
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(BETA 

j SR 

(2,4 
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(AR 

(2,6 


(A0109 

(SR 

1 2, 5 


1 

(CR 
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BE 

|B0108 
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js 

(2,=F*1000* 


ft_ 

__L _ 
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When statement 5 is used to process the 
108th macro-instruction, statement 5 
becomes the 109th macro-instruction proc¬ 
essed. Therefore, each occurrence of 
SSYSNDX is replaced by the number 0109. 

For example, statement 1 is used to create 
the unique name A0109. 


SSYSECT — Current Control Section 


The system variable symbol SSYSECT may be 
used to represent the name of the control 
section in which a macro-instruction 
appears. For each inner and outer macro¬ 
instruction processed by the assembler, 
SSYSECT is assigned a value that is the 
name of the control section in which the 
macro-instruction appears. 

When SSYSECT is used in a macro¬ 
definition, the value substituted for 
SSYSECT is the name of the last CSECT, 
DSECT, or START statement that occurs 
before the macro-instruction. If no named 
CSECT, DSECT, or START statements occur 
before a macro-instruction, SSYSECT is 
assigned a null character value for that 
macro-instruction. 

CSECT or DSECT statements processed in a 
macro-definition affect the value for 
SSYSECT for any subsequent inner macro¬ 
instructions in that definition, and for 
any other outer and inner macro¬ 
instructions. 


Throughout the use of a macro¬ 
definition, the value of SSYSECT may be 
considered a constant, independent of any 
CSECT or DSECT statements or inner macro¬ 
instructions in that definition. SSYSECT 
will take on the name of the last CSECT, 
DSECT, or START statement regardless of 
whether or not that statement is correct. 

The next example illustrates these 
rules. 


Statement 5 is the 107th macro¬ 
instruction processed. Therefore, SSYSNDX 
is assigned the number 0107 for that macro¬ 
instruction. The number 0107 is 
substituted for SSYSNDX when it is used in 
statements 1 and 3. The number 0106 is 
substituted for the global SETC symbol 
SNDXNUM in statement 2- 


Statement 8 is the 108th macro- 
instruction processed. Therefore,each 
occurrence of SSYSNDX is replaced by the 
number 0108. For example, statement 6 is 
used to create the unique name B0108. 


Statement 8 is the last CSECT, DSECT, or 
START statement processed before statement 
9 is processed. Therefore, SSYSECT is 
assigned the value MAINPROG for macro¬ 
instruction OUTERl in statement 9. 

MAINPROG is substituted for SSYSECT when it 
appears in statement 6. 


Statement 3 is the last CSECT, DSECT, or 
START statement processed before statement 
4 is processed. Therefore, SSYSECT is 
assigned the value CS0UT1 for macro¬ 
instruction INNER in statement 4. CSOUT1 
is substituted for SSYSECT when it appears 
in statement 2. 
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Statement 

1 is used 

to generate a CSECT 

SSYSLIST and symbolic parameters may be 

statement for 

statement 

4. This is the 


used in the same macro-definition. 

last CSECT, DSECT, or START statement that 


appears before statement 5. Therefore, 


SSYSLIST(n) may be used to refer to the 

SSYSECT is assigned the 

value INA for 


nth macro-instruction operand. In 

macro-instruction INNER 

in statement 5. 


addition, if the nth operand is a sublist. 

INA is substituted for 

SSYSECT when it 


then SSYSLIST(n,m) may be used to refer to 

appears in statement 2. 



the mth operand in the sublist, where n and 


- T - 

T “ 

-T 

m may be any arithmetic expressions allowed 

| Name 

jOperation |Operand 

\ 

in the operand field of a SETA statement. 

|- 


“ ~.~i 

— 1 


1 

jMACRO 

1 

1 

When n is equal to zero, a null operand 

1 

jINNER 

|SINCSECT 

1 

results. When n is from 1 to 100, the 

1 |SINCSECT 

|CSECT 

1 

i 

value of the operand is given (providing an 

2 | 

j DC 

jA(SSYSECT) 

1 

operand exists corresponding to n). An 

1 

1 

j MEND 

I 

1 

1 

1 

1 

error results when n is greater than 100. 

1 

1 

1 

|MACRO 

1 

1 

1 

1 

The type, length, scaling, integer, and 

1 

joUTERI 

1 

1 

count attributes of SSYSLIST(n) and 

3 jcSOUTl 

j CSECT 

1 

1 

SSYSLIST(n,m) and the number attributes of 

1 

|DS 

J100C 

1 

SSYSLIST(n) and SSYSLIST may be used in 

4 | 

|INNER 

j INA 

1 

conditional assembly instructions. 

5 | 

jINNER 

1 INB 

1 

N*SSYSLIST may be used to refer to the 

6 | 

j DC 

jA(SSYSECT) 

1 

total number of operands in a macro¬ 

1 

j MEND 

1 

1 

instruction statement. N* SSYSLIST(n) may 

1 

1 

1 

1 

be used to refer to the number of operands 

1 

j MACRO 

1 

1 

in a sublist. If the nth operand is 

1 

(OUTER2 

1 

1 

omitted, N* is zero; if the nth operand is 

7 1 

j DC 

j A (SSYSECT) 

1 

not a sublist, N* is one. 

1 

|MEND 

1 

1 


t- 

—-f-- 

--1- 


The following procedure is used to 

8 j MAINPROG 

jCSECT 

1 

1 

evaluate N*SSYSLIST: 

1 

|DS 

1200C 

1 


9 | 

lOUTERl 

1 

1 

1. A sublist is considered to be one 

10 | 

j OUTER2 

1 

1 

operand. 

\ - 

H- 

--|-—-— 

-H 

2. The number of operands equals one plus 

j MAINPROG 

| CSECT 

1 

1 

the number of commas indicating the 

1 

|DS 

| 200C 

1 

end of an operand. 

|CSOUT1 

|CSECT 

1 

1 


1 

|DS 

jiooc 

1 

Note; SSYSLIST can be used to access 

| INA 

jCSECT 

1 

1 

parameters without a corresponding symbolic 

1 

| DC 

|A(CSOUTl) 

1 

parameter appearing in the prototype. 

| INB 

jCSECT 

1 

1 


1 

j DC 

jA(INA) 

l 

Attributes are discussed in Section 7 

1 

j DC 

jA(MAINPROG) 


under Attributes. 

1 

| DC 

j A(INB) 

1 


L 

—i-- 

- L_ _ 

_ j 



Statement: 1 is used to generate a CSECT 
statement for statement 5- This is the 
last CSECT, DSECT, or START statement that 
appears before statement 10. Therefore, 
SSYSECT is assigned the value INB for 
macro-instruction OUTER2 in statement 10. 
INB is substituted for SSYSECT when it 
appears in statement 7. 


SSYSLIST — Macro-Instruction Operand 


The system variable symbol 6SYS LIST pro¬ 
vides the progranmer with an alternative to 
symbolic parameters for referring to macro¬ 
instruction operands. 


KEYWORD MACRO-DEFINITIONS AND INSTRUCTIONS 


Keyword macro-definitions provide the pro¬ 
grammer with an alternate way of preparing 
macro-definitions. 

A keyword macro-definition enables a 
programmer to reduce the number of operands 
in each macro-instruction that corresponds 
to the definition, and to write the oper¬ 
ands in any order. 

The macro-instructions that correspond 
to the macro-definitions described in Sec¬ 
tion 7 (hereinafter called positional 
macro-instructions and positional macro¬ 
definitions, respectively) require the 
operands to be written in the same order as 
the corresponding symbolic parameters in 
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the operand entry of the prototype 
statement. 


The following are invalid keyword proto¬ 
type operands. 


In a keyword macro-definition, the pro¬ 
grammer can assign values to any symbolic 
parameters that appear in the operand of 
the prototype statement. The value 
assigned to a symbolic parameter is substi¬ 
tuted for the symbolic parameter, if the 
programmer does not write anything in the 
operand of the macro-instruction to corres¬ 
pond to the symbolic parameter. 

When a keyword macro-instruction is 
written, the programmer need only write one 
operand for each symbolic parameter whose 
value he wants to change. 


CARDAREA 
6TYPE 
STWO =123 


6 AREA= X*189A* 


(no symbolic parameter) 
(no equal sign) 

(equal sign does not 
immediately follow 
symbolic parameter) 

( value does 

not immediately follow 
equal sign) 


The following keyword prototype state¬ 
ment contains a symbolic parameter in the 
name entry and four operand entries in the 
operand. The first two operand entries 
contain values. The mnemonic operation 
code is MOVE. 


Keyword macro-definitions are prepared 
the same way as positional macro- 
definitions, except that the prototype 
statement is written differently, and 
SSYSLIST may not be used in the definition. 
The rules for preparing positional macro¬ 
definitions are in Section 7. 


|Name |Operation |Operand 

fsN |MOVE |6R=2,SA=S,6T=,SF= 


1 


—1 


J 


Keyword Macro-Instruction 


Keyword Prototype 

After a programmer has prepared a keyword 
macro-definition he may use it by writing a 
The typical form of this statement is: keyword macro-instruction. 


i - 

| Name 

j A symbolic 
(parameter 
jor not used 

I 

I 


|Operation 

+- 

| A symbol 


I 

I 


j Operand 

•4- 

(One to 100 
(operands of the 
(form described 
(below, separated 
(by commas 


I 

1 


I 


_j 


Each operand must consist of a symbolic 
parameter, immediately followed by an equal 
sign and optionally followed by a value. 
Nested keywords are not permitted. 

A value that is part of an operand must 
immediately follow the equal sign. 

Anything that may be used as an operand 
in a macro-instruction except variable 
symbols, may be used as a value in a 
keyword prototype statement. The rules for 
forming valid macro-instruction operands 
are detailed in Section 8 . 

The following are valid keyword proto¬ 
type operands. 

6 READER= 

6LOOP2=SYMBOL 
6S4==F* 4096* 


The typical form of a keyword macro- 
instruction is: 


r-r- t- 1 

|Name |Operation(Operand | 

| |A symbol,(Mnemonic J Zero to 100 operands ( 
jsequence (operation! of the form described! 
jsymbol,orjcode (below, separated by j 

(not used j j commas j 


—j 


Each operand consists of a keyword 
immediately followed by an equal sign and 
an optional value. Nested keywords are not 
permitted. Anything that may be used as an 
operand in a positional macro-instruction 
may be used as a value in a keyword macro¬ 
instruction. The rules for forming valid 
positional macro-instruction operands are 
detailed in Section 8 . 

A keyword consists of one through seven 
letters and digits, the first of which must 
be a letter. 

The keyword part of each keyword macro¬ 
instruction operand must correspond to one 
of the symbolic parameters that appears in 
the operand of the keyword prototype 
statement. A keyword corresponds to a 
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symbolic parameter if the characters of the 
keyword are identical to the characters of 
the symbolic parameter that follow the 
ampersand. 

The following are valid keyword macro¬ 
instruction operands. 

LOOP2=SYMBOL 
S4=F* 4096* 

TO= 


The following are invalid keyword macro¬ 
instruction operands. 

6X4F2=0(2,3) (keyword does not begin 
with a letter) 

CARD AREA= A+ 2 (keyword is more than 

seven characters) 

=(TO(8),(FROM)) (no keyword) 

The operands in a keyword macro¬ 
instruction may be written in any order. 

If an operand appeared in a keyword 
prototype statement, a corresponding oper¬ 
and does not have to appear in the keyword 
macro-instruction. If an operand is omit¬ 
ted, the comma that would have separated it 
from the next operand need not be written. 

The following rules are used to replace 
the symbolic parameters in the statements 
of a keyword macro-definition. 

1. If a symbolic parameter appears in the 
name entry of the prototype statement, 
and the name entry of the macro¬ 
instruction contains a symbol, the 
symbolic parameter is replaced by the 
symbol, if the name entry of the 
macro-instruction is unused or contains 
a sequence symbol, the symbolic param¬ 
eter is replaced by a null character 
value. 

2. If a symbolic parameter appears in the 
operand of the prototype statement, and 
the macro-instruction contains a key¬ 
word that corresponds to the symbolic 
parameter, the value assigned to the 
keyword replaces the symbolic paramet¬ 
er. 

3. If a symbolic parameter was assigned a 
value by a prototype statement, and the 
macro-instruction does not contain a 
keyword that corresponds to the symbol¬ 
ic parameter, the standard value 
assigned to the symbolic parameter 
replaces the symbolic parameter, oth¬ 
erwise, the symbolic parameter is 
replaced by a null character value. 

Note: If a symbolic parameter value is a 
self-defining term the type attribute 
assigned to the value is the letter N. If 
a symbolic parameter value is omitted the 
type attribute assigned to the value is the 


letter 0. All other values are assigned 
the type attribute U. 

The following keyword macro-definition, 
keyword macro-instruction, and generated 
statements illustrate these rules. 

Statement 1 assigns the values 2 and S 
to the symbolic parameters £R and fcA, res¬ 
pectively. Statement 6 assigns the values 
FA, FB, and THERE to the keywords T, F, and 
A, respectively. The symbol HERE is used 
in the name entry of statement 6. 

Since a symbolic parameter (tN) appears 
in the name entry of the prototype state¬ 
ment (statement 1), and the corresponding 
characters (HERE) of the macro-instruction 
(statement 6) are a symbol, $N is replaced 
by HERE in statement 2. 

(Name |Operation |Operand | 


1 

2 

3 

4 

5 


6 



| £R=2,fcA=S,6T=,fcF= 
| 6R,£A 
I *R,*F 
| 6R,ST 
I &R , 6 A 


T=FA, F=FB, A= THERE 


|2,THERE 
| 2,FB 
I 2,FA 
|2,THERE 


-4 


Since 6T appears in the operand of 
statement 1, and statement 6 contains the 
keyword (T) that corresponds to 6T, the 
value assigned to T (FA) replaces fcT in 
statement 4. Similarly, FB and THERE 
replace 6F and SA in statement 3 and in 
statements 2 and 5, respectively. Note 
that the value assigned to £A in statement 
6 is used instead of the value assigned to 
6 A in statement 1. 

Since 6R appears in the operand of 
statement 1, and statement 6 does not con¬ 
tain a corresponding keyword, the value 
assigned to 6R (2), replaces fcR in state¬ 
ments 2, 3, 4, and 5. 


Operand Sublists: The value assigned to a 
keyword and the value assigned to a symbol¬ 
ic parameter may be an operand sublist. 
Anything that may be used as an operand 
sublist in a positional macro-instruction 
may be used as a value in a keyword macro¬ 
instruction and as a value in a keyword 
prototype statement. The rules for forming 
valid operand sublists are detailed in 
Section 8 under "Operand Sublists.* 
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Keyword Inner Macro-Instructions: Keyword 
and positional inner macro-instructions may 
be used as model statements in either 
keyword or positional macro-definitions. 


Mixed-Mode Macro-Instruction 

The typical form of a mixed-mode macro¬ 
instruction is: 


MIXED-MODE MACRO-DEFINITIONS AND 
INSTRUCTIONS 


Mixed-mode macro-definitions allow the 
programmer to use the features of keyword 
and positional macro-definitions in the 
same macro-definition. 


Mixed-mode macro-definitions are pre¬ 
pared the same way as positional macro¬ 
definitions, except that the prototype 
statement is written differently, and 
6 SYSLIST may not be used in the definition. 
The rules for preparing positional macro- 
definitions are in Section 7. 


Mixed-Mode Prototype 


The typical form of this statement is: 


|Name |operation (operand | 

|A symbolic (A symbol (Two to 100 oper- 
jparameter j lands of the form 
jor not usedj jdescribed below, 
j I jseparated by 


|commas 


l _ 


_j 


The operands must be valid operands of 
positional and keyword prototype 
statements. All the positional operands 
must precede the first keyword operand. 
The rules for forming positional operands 
are discussed in Section 7 under Macro- 
Instruction Prototype . The rules for 
forming keyword operands are discussed 
under Keyword Prototype . 

The following sample mixed-mode proto¬ 
type statement contains three positioned 
operands and two keyword operands. 


j Name 
| SN 


|Operation|Operand 
|MOVE |STY,6P,SR,6TO=,SF= 



|Name |Operation|Operand 


-H 


| A symbol,|Mnemonic | Zero to 100 operands 
jseguence (operation! of the form described 
|symbol,or|code j below, separated by 

j not used j j commas 

I I I 




The operand consists of two parts. The 
first part corresponds to the positional 
prototype operands. This part of the 
operand is written in the same way that the 
operand entry of a positional macro¬ 
instruction is written. The rules for 
writing positional macro-instructions are 
in Section 8. 


The second part of the operand 
corresponds to the keyword prototype oper¬ 
ands. This part of the operand is written 
in the same way that the operand entry of a 
keyword macro-instruction is written. The 
rules for writing keyword macro¬ 
instructions are described under Keyword 
Macro-Instruction . 

The following mixed-mode macro¬ 
definition, mixed-mode macro-instruction, 
and generated statements illustrate these 
facilities. 


1 


2 


| Name 

Y - 

I 

j £N 
j SN 

I 


(Operation! Operand | 

|MACRO | | 

|MOVE j STY,6P,SR,£TO=,SF= | 

j STSTY | SR,SAVE j 

|L£TY ( SR,SPSF | 

|STSTY | SR,6P6TO | 

(L6TY ( SR,SAVE j 


t-+-+- ^ 

(HERE (MOVE j H,,2,F=FB,TO=FA j 

| HERE (STH | 2,SAVE | 

| |LH ( 2,FB | 

| |STH | 2,FA | 

j |LH | 2,SAVE j 


The prototype statement (statement 1) 
contains three positional operands (STY,6P, 
and SR) and two keyword operands (STO and 
SF). In the macro-instruction (statement 
2 ) the positional operands are written in 
the same order as the positional operands 
in the prototype statement (the second 
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operand is omitted). The keyword operands 
are written in an order that is different 
from the order of keyword operands in the 
prototype statement. 

Mixed-mode inner macro-instructions may 
be used as model statements in mixed-mode, 
keyword, and positional macro-definitions. 
Keyword and positional inner macro¬ 
instructions may be used as model 
statements in mixed-mode macro-definitions. 


DOS/TOS Assembler provided that all SET 
symbols are defined in an appropriate LCLB , 
GBLA, GBLB, or GBLC statement. The AIFB 
and AGOB instructions are processed by the 
DOS/TOS Assembler the same way that the 
AIF and AGO instructions are processed. 

AIFB and AGOB instructions cause the count 
set up by the ACTR instruction to be decre¬ 
mented exactly like the AGO and AIF 
instructions. 


CONDITIONAL ASSEMBLY COMPATIBILITY 


Macro-definitions prepared for use with the 
other System/360 assemblers having macro 
language facilities may be used with the 
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APPENDIX A: EXTENDED BINARY CODED DECIMAL INTERCHANGE CODE (EBCDIC) 


The following charts and the associated key 
show the bit configurations of the 256 
possible codes (characters) of the Extended 
BCD Interchange Code. To write a given 
character in binary, locate the character 
on the chart. The top row of coordinates 
equates to bit positions 0 and 1, the sec¬ 
ond row to bit positions 2 and 3, and the 
left row of coordinates equates to bit 
positions 4, 5, 6 and 7. 

Examples : 

Character A equals: 

top row - 11 (bit positions 0, 1) 

2nd row - 00 (bit positions 2, 3) 

left row - 0001 (bit positions 4, 5, 6 
and 7) 

Therefore, character A is shown as: 1100 

0001. 


Character $ equals: 

top row - 01 (bit positions 0, 1) 

2nd row - 01 (bit positions 2, 3) 

left row - 1011 (bit positions 4, 5, 6 
and 7) 


Therefore, character $ is shown as: 

0101 1011. 


The coordinates on the bottom of the 
chart are the three zone punches required 
to reproduce the character in a punched 
card; the coordinates on the right side 
represent the numeric punches. 


Examples : 


Character A = bottom row - 12 punch 
right row - 1 punch 

Therefore, Character A is shown by a 12 
and a 1 punch in the same card column. 


Character $ = bottom row - 11 punch 

right row - 8 and 3 punches 

Therefore, Character $ is shown by 11, 
8 , and 3 punches in the same card column. 

There are fifteen exceptions to the 
punching equated to bit positions. These 
exceptions are shown in the chart by cir¬ 
cled numbers 1 through 15, and the substi¬ 
tuted punching is shown below the chart 
under Exceptions . 
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—n— 

00 0 ? 10 11 


PF RES BYP PN 


DEL IIL PRE 


Bit Positions 


0 , 1 

Bit Positions 


■ Zone Punches■ 


001 01 10 11 


00 ! 01 i 10 i II 


Bit Positions 

Bit Positions 


Zone Punches 


00 I 01 10 t 11 


Bit Positions 


Bit Positions 


M 
N 

O I W I 6 


H Q Y 


Zone Punches 


Bit Positions 


Bit Positions 


Zone Punches 


© 

12-0-9-8-1 

© 

No Punches 

© 

12-0 

@ 0-1 

© 

12-11-9-8-1 

© 

12 

@ 

11-0 

<Q) n-o-9- 

© 

11-0-9-8-1 

© 

11 

© 

0-8-2 

@ 12-11 

© 

12-11-0-9-8-1 

© 

12-11-0 

© 

0 



Extended Binary Coded Decimal Interchange Code (Part 1 of 2) 


Appendix A 






































































































Control Characters 


PF 

Punch Off 

BS 

Backspace 

PN 

Punch On 

HT 

Horizontal Tab 

IL 

Idle 

RS 

Reader Stop 

LC 

Lower Case 

BY 

Bypass 

UC 

Upper Case 

DL 

Delete 

LF 

Line Feed 

ET 

End of Transmission 

RE 

Restore 

EB 

End of Block 

SM 

Set Mode 

NL 

New Line 

PR 

Prefix 

SP 

Space 

DS 

Digit Select 

SOS 

Start of Significance 

FS 

Field Separator 


Special Graphic Characters 

C Cent Sign 
• Period, Decimal Point 
Less-than Sign 
( Left Parenthesis 
+ Plus Sign 

| Vertical Bar, Logical OR 
& Ampersand 
1 Exclamation Point 
$ Dollar Sign 


* Asterisk 

) Right Parenthesis 
; Semicolon 
• Logical NOT 
~ Minus Sign, Hyphen 
/ Slash 

• Comma 
% Percent 

Underscore 


> 

0 


Greater-than Sign 
Question Mark 
Colon 

Number Sign 
At Sign 

Prime, Apostrophe 
Equal Sign 
Quotation Mark 


Examples 

Type 

Bit Pattern 

Bit Positions 

01 23 4567 

Hole Pattern 

Zone Punches Digit Punches 

PF 

Control Character 

00 00 0100 

12-9-4 

% 

Special Graphic 

01 10 1100 

0-8-4 

R 

Upper Case 

11 01 1001 

11-9 

| 

a 

Lower Case 

10 00 0001 

12-0-1 


Control Character, 
function not yet 
assigned 

00 11 0000 

12-11-0 -9-8-1 

I 

1 

_1_ 


Extended Binary coded Decimal interchange Code (Part 2 of 2) 


r 


100 





















APPENDIX B: HEXADECIMAL-DECIMAL NUMBER CONVERSION TABLE 


The table in this appendix provides for 
direct conversion of decimal and hexadeci¬ 
mal numbers in these ranges: 

| Hexadecimal | Decimal j 

Y -1-*1 

I 000 to FFF I 0000 to 4095 j 


Decimal numbers (0000-4095) are given with¬ 
in the 5-part table. The first two charac¬ 
ters (high-order) of hexadecimal numbers 
(000-FFF) are given in the lefthand column 
of the table; the third character (x) is 
arranged across the top of each part of the 
table. 

To find the decimal equivalent of the 
hexadecimal number 0C9, look for 0C in the 
left column, and across that row under the 
column for x = 9. The decimal number is 
0201. 

To convert from decimal to hexadecimal, 
look up the decimal number within the table 
and read the hexadecimal number by a combi¬ 
nation of the hex characters in the left j 

column, and the value for x at the top of 1 

the column containing the decimal number. 


For example, the decimal number 123 has the 
hexadecimal equivalent of 07B; the decimal 
number 1478 has the hexadecimal equivalent 
of 5C6. 

For numbers outside the range of the 
table, add the following values to the 
table 

I-T- 1 

| Hexadecimal | Decimal | 

I-+-^ 


1000 

| 4096 

2000 

| 8192 

3000 

| 12288 

4000 

| 16384 

5000 

| 20480 

6000 

j 24576 

7000 

| 28672 

8000 

| 32768 

9000 

| 36864 

A000 

j 40960 

B000 

| 45056 

cooo 

| 49152 

D000 

| 53248 

E000 

| 57344 

F000 

I 61440 


.x -,_J 


Appendix B 101 










234567 89ABCDEF 



0000 

0001 

0002 

0003 

0004 

0005 

0006 

0007 

0008 

0009 

0010 

0011 

0012 

0013 

0014 

0015 

HI 

0016 

0017 

0018 

0019 

0020 

0021 

0022 

0023 

0024 

0025 

0026 

0027 

0028 

0029 

0030 

0031 


0032 

0033 

0034 

0035 

0036 

0037 

0038 

0039 

0040 

0041 

0042 

0043 

0044 

0045 

0046 

0047 

03x 

0048 

0049 

0050 

0051 

0052 

0053 

0054 

0055 

0056 

0057 

0058 

0059 

0060 

0061 

0062 

0063 

04x 

0064 

0065 

0066 

0067 

0068 

0069 

0070 

0071 

0072 

0073 

0074 

0075 

0076 

0077 

0078 

0079 

05x 

0080 

0081 

0082 

0083 

0084 

0085 

0086 

0087 

0088 

0089 

0090 

0091 

0092 

0093 

0094 

0095 

06x 

0096 

0097 

0098 

0099 

0100 

0101 

0102 

0103 

0104 

0105 

0106 

0107 

0108 

0109 

0110 

0111 

07x 

0112 

0113 

0114 

0115 

0116 

0117 

0118 

0119 

0120 

0121 

0122 

0123 

0124 

0125 

0126 

0127 

08x 

0128 

0129 

0130 

0131 

0132 

0133 

0134 

0135 

0136 

0137 

0138 

0139 

0140 

0141 

0142 

0143 

09x 

0144 

0145 

0146 

0147 

0148 

0149 

0150 

0151 

0152 

0153 

0154 

0155 

0156 

0157 

0158 

0159 

OAx 

0160 

0161 

0162 

0163 

0164 

0165 

0166 

0167 

0168 

0169 

0170 

0171 

0172 

0173 

0174 

0175 

OBx 

0176 

0177 

0178 

0179 

0180 

0181 

0182 

0183 

0184 

0185 

0186 

0187 

0188 

0189 

0190 

0191 

OCx 

0192 

0193 

0194 

0195 

0196 

0197 

0198 

0199 

0200 

0201 

0202 

0203 

0204 

0205 

0206 

0207 

ODx 

0208 

0209 

0210 

0211 

0212 

0213 

0214 

0215 

0216 

0217 

0218 

0219 

0220 

0221 

0222 

0223 

OEx 

0224 

0225 

0226 

0227 

0228 

0229 

0230 

0231 

0232 

0233 

0234 

0235 

0236 

0237 

0238 

0239 

OFx 

0240 

0241 

0242 

0243 

0244 

0245 

0246 

0247 

0248 

0249 

0250 

0251 

0252 

0253 

0254 

0255 

lOx 

0256 

0257 

0258 

0259 

0260 

0261 

0262 

0263 

0264 

0265 

0266 

0267 

0268 

0269 

0270 

0271 

11x 

0272 

0273 

0274 

0275 

0276 

0277 

0278 

0279 

0280 

0281 

0282 

0283 

0284 

0285 

0286 

0287 

12x 

0288 

0289 

0290 

0291 

0292 

0293 

0294 

0295 

0296 

0297 

0298 

0299 

0300 

0301 

0302 

0303 

13x 

0304 

0305 

0306 

0307 

0308 

0309 

0310 

0311 

0312 

0313 

0314 

0315 

0316 

0317 

0318 

0319 

14x 

0320 

0321 

0322 

0323 

0324 

0325 

0326 

0327 

0328 

0329 

0330 

0331 

0332 

0333 

0334 

0335 

15x 

0336 

0337 

0338 

0339 

0340 

0341 

0342 

0343 

0344 

0345 

0346 

0347 

0348 

0349 

0350 

0351 

16x 

0352 

0353 

0354 

0355 

0356 

0357 

0358 

0359 

0360 

0361 

0362 

0363 

0364 

0365 

0366 

0367 

17x 

0368 

0369 

0370 

0371 

0372 

0373 

0374 

0375 

0376 

0377 

0378 

0379 

0380 

0381 

03 82 

0383 

18x 

0384 

0385 

0386 

0387 

0388 

0389 

0390 

0391 

0392 

0393 

0394 

0395 

0396 

0397 

0398 

0399 

19x 

0400 

0401 

0402 

04D3 

0404 

0405 

0406 

0407 

0408 

0409 

0410 

0411 

0412 

0413 

0414 

0415 

lAx 

0416 

0417 

0418 

041? 

0420 

0421 

0422 

0423 

0424 

0425 

0426 

0427 

0428 

0429 

0430 

0431 

IBx 

0432 

0433 

0434 

0435 

0436 

0437 

0438 

0439 

0440 

0441 

0442 

0443 

0444 

0445 

0446 

0447 

ICx 

0448 

0449 

0450 

0451 

0452 

0453 

0454 

0455 

0456 

0457 

0458 

0459 

0460 

0461 

0462 

0463 

IDx 

0464 

0465 

0466 

0467 

0468 

0469 

0470 

0471 

0472 

0473 

0474 

0475 

0476 

0477 

0478 

0479 

1EX 

0480 

0481 

0482 

0483 

0484 

0485 

0486 

0487 

0488 

0489 

0490 

0491 

0492 

0493 

0494 

0495 

IFx 

0496 

0497 

0498 

04 99 

0500 

0501 

0502 

0503 

0504 

0505 

0506 

0507 

0508 

0509 

0510 

0511 

2 Ox 

0512 

0513 

0514 

0515 

0516 

0517 

0518 

0519 

0520 

0521 

0522 

0523 

0524 

0525 

0526 

0527 

21x 

0528 

0529 

0530 

0531 

0532 

0533 

0534 

0535 

0536 

0537 

0538 

0539 

0540 

0541 

0542 

0543 

22x 

0544 

0545 

0546 

0547 

0548 

0549 

0550 

0551 

0552 

0553 

0554 

0555 

0556 

0557 

0558 

0559 

23x 

0560 

0561 

0562 

0563 

0564 

0565 

0566 

0567 

0568 

0569 

0570 

0571 

0572 

0573 

0574 

0575 

24x 

0576 

0577 

0578 

0579 

0580 

0581 

0582 

0583 

0584 

0585 

0586 

0587 

0588 

0589 

0590 

0591 

25x 

0592 

0593 

0594 

0595 

0596 

0597 

0598 

0599 

0600 

0601 

0602 

0603 

0604 

0605 

0606 

0607 

26x 

0608 

0609 

0610 

0611 

0612 

0613 

0614 

0615 

0616 

0617 

0618 

0619 

0620 

0621 

0622 

0623 

27x 

0624 

0625 

0626 

0627 

0628 

0629 

0630 

0631 

0632 

0633 

0634 

0635 

0636 

0637 

0638 

0639 

28x 

0640 

0641 

0642 

0643 

0644 

0645 

0646 

0647 

0648 

0649 

0650 

0651 

0652 

0653 

0654 

0655 

29x 

0656 

0657 

0658 

0659 

0660 

0661 

0662 

0663 

0664 

0665 

0666 

0667 

0668 

0669 

0670 

0671 

2Ax 

0672 

0673 

0674 

0675 

0676 

0677 

0678 

0679 

0680 

0681 

0682 

0683 

0684 

0685 

0686 

0687 

2Bx 

0688 

0689 

0690 

0691 

0692 

0693 

0694 

0695 

0696 

0697 

0698 

0699 

0700 

0701 

0702 

0703 

2Cx 

0704 

0705 

0706 

0707 

0708 

0709 

0710 

0711 

0712 

0713 

0714 

0715 

0716 

0717 

0718 

0719 

2Dx 

0720 

0721 

0722 

0723 

0724 

0725 

0726 

0727 

0728 

0729 

0730 

0731 

0732 

0733 

0734 

0735 

2Ex 

0736 

0737 

0738 

0739 

0740 

0741 

0742 

0743 

0744 

0745 

0746 

0747 

0748 

0749 

0750 

0751 

2Fx 

0752 

0753 

0754 

0755 

0756 

0757 

0758 

0759 

0760 

0761 

0762 

0763 

0764 

0765 

0766 

0767 

30x 

0768 

0769 

0770 

0771 

0772 

0773 

0774 

0775 

0776 

0777 

0778 

0779 

0780 

0781 

0782 

0783 

31x 

0784 

0785 

0786 

0787 

0788 

0789 

0790 

0791 

0792 

0793 

0794 

0795 

0796 

0797 

0798 

0799 

32x 

0800 

0801 

0802 

0803 

0804 

0805 

0806 

0807 

0808 

0809 

0810 

0811 

0812 

0813 

0814 

0815 

33x 

0816 

0817 

0818 

0819 

0820 

0821 

0822 

0823 

0824 

0825 

0826 

0827 

0828 

0829 

0830 

0831 

Flirts 

0832 

0833 

0834 

0835 

0836 

0837 

0838 

083 9 

0840 

0841 

0842 

0843 

0844 

0845 

0846 

0847 


0848 

0849 

0850 

0851 

0852 

0853 

0854 

0855 

0856 

0857 

0858 

0859 

0860 

0861 

0862 

0863 


0864 

0865 

0866 

0867 

0868 

0869 

0870 

0871 

0872 

0873 

0874 

0875 

0876 

0877 

0878 

0879 

37x 

0880 

0881 

0882 

0883 

0884 

0885 

0886 

0887 

0888 

0889 

0890 

0891 

0892 

0893 

0894 

0895 

38x 

0896 

0897 

0898 

0899 

0900 

0901 

0902 

0903 

)904 

0905 

0906 

0907 

0908 

0909 

0910 

0911 

39x 

0912 

0913 

0914 

0915 

0916 

0917 

0918 

0919 

0920 

0921 

0922 

0923 

0924 

0925 

0926 

0927 

3 Ax 

0928 

0929 

0930 

0931 

0932 

0933 

0934 

0935 

0936 

0937 

0938 

0939 

0940 

0941 

0942 

0943 

3Bx 

0944 

0945 

0946 

0947 

0948 

0949 

0950 

0951 

0952 

0953 

0954 

0955 

0956 

0957 

0958 

0959 

3Cx 

0960 

0961 

0962 

0963 

0964 

0965 

0966 

0967 

0968 

0969 

0970 

0971 

0972 

0973 

0974 

0975 

30x 

0976 

0977 

0978 

0979 

0980 

0981 

0982 

0983 

0984 

0985 

0986 

0987 

0988 

0989 

0990 

0991 

3 Ex 

0992 

0993 

0994 

0995 

0996 

0997 

0998 

0999 

1000 

1001 

1002 

1003 

1004 

1005 

1006 

1007 

3Fx 

1008 

1009 

1010 

1011 

1012 

1013 

1014 

1015 

1016 

1017 

1018 

1019 

1020 

1021 

1022 

1023 


102 








x = 0 

1 

2 

3 

4 

5 

6 

7 

8 

9 

A 

B 

C 

D 

E 

F 

40x 

1024 

1025 

1026 

1027 

1028 

1029 

1030 

1031 

1032 

1033 

1034 

1035 

1036 

1037 

1038 

1039 

41x 

1040 

1041 

1042 

1043 

1044 

1045 

1046 

1047 

1048 

1049 

1050 

1051 

1052 

1053 

1054 

1055 

42x 

1056 

1057 

1058 

1059 

1060 

1061 

1062 

1063 

1064 

1065 

1066 

1067 

1068 

1069 

1070 

1071 

43x 

1072 

1073 

1074 

1075 

1076 

1077 

1078 

1079 

1080 

1081 

1082 

1083 

1084 

1085 

1086 

1087 

44x 

1088 

1089 

1090 

1091 

1092 

1093 

1094 

1095 

1096 

1097 

1098 

1099 

1100 

1101 

1102 

1103 

45x 

1104 

1105 

1106 

1107 

1108 

1109 

1110 

1111 

1112 

1113 

1114 

1115 

1116 

1117 

1118 

1119 

46x 

1120 

1121 

1122 

1123 

1124 

1125 

1126 

1127 

1128 

1129 

1130 

1131 

1132 

1133 

1134 

1135 

47x 

1136 

1137 

1138 

1139 

1140 

1141 

1142 

1143 

1144 

1145 

1146 

1147 

1148 

1149 

1150 

1151 

48x 

1152 

1153 

1154 

1155 

1156 

1157 

1158 

1159 

1160 

1161 

1162 

1163 

1164 

1165 

1166 

1167 

49x 

1168 

1169 

1170 

1171 

1172 

1173 

1174 

1175 

1176 

1177 

1178 

1179 

1180 

1181 

1182 

1183 

4 Ax 

1184 

1185 

1186 

1187 

1188 

1189 

1190 

1191 

1192 

1193 

1194 

1195 

1196 

1197 

1198 

1199 

4Bx 

1200 

1201 

1202 

1203 

1204 

1205 

1206 

1207 

1208 

1209 

1210 

1211 

1212 

1213 

1214 

1215 

4Cx 

1216 

1217 

1218 

1219 

1220 

1221 

1222 

1223 

1224 

1225 

1226 

1227 

1228 

1229 

1230 

1231 

4Dx 

1232 

1233 

1234 

1235 

1236 

1237 

1238 

1239 

1240 

1241 

1242 

1243 

1244 

1245 

1246 

1247 

4 Ex 

1248 

1249 

1250 

1251 

1252 

1253 

1254 

1255 

1256 

1257 

1258 

1259 

1260 

1261 

1262 

1263 

4Fx 

1264 

1265 

1266 

1267 

1268 

1269 

1270 

1271 

1272 

1273 

1274 

1275 

1276 

1277 

1278 

1279 

50x 

1280 

1281 

1282 

1283 

1284 

1285 

1286 

1287 

1288 

1289 

1290 

1291 

1292 

1293 

1294 

1295 

51x 

1296 

1297 

1298 

1299 

1300 

1301 

1302 

1303 

1304 

1305 

1306 

1307 

1308 

1309 

1310 

1311 

52x 

1312 

1313 

1314 

1315 

1316 

1317 

1318 

1319 

1320 

1321 

1322 

1323 

1324 

1325 

1326 

1327 

53x 

1328 

1329 

1330 

1331 

1332 

1333 

1334 

1335 

1336 

1337 

1338 

1339 

1340 

1341 

1342 

1343 

54x 

1344 

1345 

1346 

1347 

1348 

1349 

1350 

1351 

1352 

1353 

1354 

1355 

1356 

1357 

1358 

1359 

55x 

1360 

1361 

1362 

1363 

1364 

1365 

1366 

1367 

1368 

1369 

1370 

1371 

1372 

1373 

1374 

1375 

56x 

1376 

1377 

1378 

1379 

1380 

1381 

1382 

1383 

1384 

1385 

1386 

1387 

1388 

1389 

1390 

1391 

57x 

1392 

1393 

1394 

1395 

1396 

1397 

1398 

1399 

1400 

1401 

1402 

1403 

1404 

1405 

1406 

1407 

58x 

1408 

1409 

1410 

1411 

1412 

1413 

1414 

1415 

1416 

1417 

1418 

1419 

1420 

1421 

t422 

1423 

59x 

1424 

1425 

1426 

1427 

1428 

1429 

1430 

1431 

1432 

1433 

1434 

1435 

1436 

1437 

1438 

1439 

5Ax 

1440 

1441 

1442 

1443 

1444 

1445 

1446 

1447 

1448 

1449 

1450 

1451 

1452 

1453 

1454 

1455 

SBx 

1456 

1457 

1458 

1459 

1460 

1461 

1462 

1463 

1464 

1465 

1466 

1467 

1468 

1469 

1470 

1471 

SCx 

1472 

1473 

1474 

1475 

1476 

1477 

1478 

1479 

1480 

1481 

1482 

1483 

1484 

1485 

1486 

1487 

SDx 

1488 

1489 

1490 

1491 

1492 

1493 

1494 

1495 

1496 

1497 

1498 

1499 

1500 

1501 

1502 

1503 

5Ex 

1504 

1505 

1506 

1507 

1508 

1509 

1510 

1511 

1512 

1513 

1514 

1515 

1516 

1517 

1518 

1519 

5Fx 

1520 

1521 

1522 

1523 

1524 

1525 

1526 

1527 

1528 

1529 

1530 

1531 

1532 

1533 

1534 

1535 

60x 

1536 

1537 

1538 

1539 

1540 

1541 

1542 

1543 

1544 

1545 

1546 

1547 

1548 

1549 

1550 

1551 

61x 

1552 

1553 

1554 

1555 

1556 

1557 

1558 

1559 

1560 

1561 

1562 

1563 

1564 

1565 

1566 

1567 

62x 

1568 

1569 

1570 

1571 

1572 

1573 

1574 

1575 

1576 

1577 

1578 

1579 

1580 

1581 

1582 

1583 

63x 

1584 

1585 

1586 

1587 

1588 

1589 

1590 

1591 

1592 

1593 

1594 

1595 

1596 

1597 

1598 

1599 

64x 

1600 

1601 

1602 

1603 

1604 

1605 

1606 

1607 

1608 

1609 

1610 

1611 

1612 

1613 

1614 

1615 

65x 

1616 

1617 

1618 

1619 

1620 

1621 

1622 

1623 

1624 

1625 

1626 

1627 

1628 

1629 

1630 

1631 

66x 

1632 

1633 

1634 

1635 

1636 

1637 

1638 

1639 

1640 

1641 

1642 

1643 

1644 

1645 

1646 

1647 

67x 

1648 

1649 

1650 

1651 

1652 

1653 

1654 

1655 

1656 

1657 

1658 

1659 

1660 

1661 

1662 

1663 

68x 

1664 

1665 

1666 

1667 

1668 

1669 

1670 

1671 

1672 

1673 

1674 

1675 

1676 

1677 

1678 

1679 

69x 

1680 

1681 

1682 

1683 

1684 

1685 

1686 

1687 

1688 

1689 

1690 

1691 

1692 

1693 

1694 

1695 

6Ax 

1696 

1697 

1698 

1699 

1700 

1701 

1702 

1703 

1704 

1705 

1706 

1707 

1708 

1709 

1710 

1711 

6Bx 

1712 

1713 

1714 

1715 

1716 

1717 

1718 

1719 

1720 

1721 

1722 

1723 

1724 

1725 

1726 

1727 

6Cx 

1728 

1729 

1730 

1731 

1732 

1733 

1734 

1735 

1736 

1737 

1738 

1739 

1740 

1741 

1742 

1743 

6Dx 

1744 

1745 

1746 

1747 

1748 

1749 

1750 

1751 

1752 

1753 

1754 

1755 

1756 

1757 

1758 

1759 

6 Ex 

1760 

1761 

1762 

1763 

1764 

1765 

1766 

1767 

1768 

1769 

1770 

1771 

1772 

1773 

1774 

1775 

6Fx 

1776 

1777 

1778 

1779 

1780 

1781 

1782 

1783 

1784 

1785 

1786 

1787 

1788 

1789 

1790 

1791 

70x 

1792 

1793 

1794 

1795 

179* 

1797 

1798 

1799 

1800 

1801 

1802 

1803 

1804 

1805 

1806 

1807 

71x 

1808 

1809 

1810 

1811 

1812 

1813 

1814 

1815 

1816 

1817 

1818 

1819 

1820 

1821 

1822 

1823 

72x 

1824 

1825 

1826 

1827 

1828 

1829 

1830 

1831 

1832 

1833 

1834 

1835 

1836 

1837 

1838 

1839 

73x 

1840 

1841 

1842 

1843 

1844 

1845 

1846 

1847 

1848 

1849 

1850 

1851 

1852 

1853 

1854 

1855 

74x 

1856 

1857 

1858 

1859 

1860 

1861 

1862 

1863 

1864 

1865 

1866 

1867 

1868 

1869 

1870 

1871 

75x 

1872 

1873 

1874 

1875 

1876 

1877 

1878 

1879 

1880 

1881 

1882 

1883 

1884 

1885 

1886 

1887 

76x 

1888 

1889 

1890 

1891 

1892 

1893 

1894 

1895 

1896 

1897 

1898 

1899 

1900 

1901 

1902 

1903 

77x 

1904 

1905 

1906 

1907 

1908 

1909 

1910 

1911 

1912 

1913 

1914 

1915 

1916 

1917 

1918 

1919 

78x 

1920 

1921 

1922 

1923 

1924 

1925 

1926 

1927 

1928 

1929 

1930 

1931 

1932 

1933 

1934 

1935 

79x 

1936 

1937 

1938 

1939 

1940 

1941 

1942 

1943 

1944 

1945 

1946 

1947 

1948 

1949 

1950 

1951 

7 Ax 

1952 

1953 

1954 

1955 

1956 

1957 

1958 

1959 

1960 

1961 

1962 

1963 

1964 

1965 

1966 

1967 

7Bx 

1968 

1969 

1970 

1971 

1972 

1973 

1974 

1975 

1976 

1977 

1978 

1979 

1980 

1981 

1982 

1983 

7Cx 

1984 

1985 

1986 

1987 

1988 

1989 

1990 

1991 

1992 

1993 

1994 

1995 

1996 

1997 

1998 

1999 

7Dx 

2000 

2001 

2002 

2003 

2004 

2005 

2006 

2007 

2008 

2009 

2010 

2011 

2012 

2013 

2014 

2015 

7 Ex 

2016 

2017 

2018 

2019 

2020 

2021 

2022 

2023 

2024 

2025 

2026 

2027 

2028 

2029 

2030 

2031 

7Fx 

2032 

2033 

2034 

2035 

2036 

2037 

2038 

2039 

2040 

2041 

2042 

2043 

2044 

2045 

2046 

2047 
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APPENDIX C: MACHINE-INSTRUCTION FORMAT 




1-+ 

RX 


RR 


RS 


H-+ 


SI 


H-4 


ss 


BASIC MACHINE FORMAT 

T -T-,- 1 

I 8 |4 |4 | 

|Operation| J | 

| Code j Rlj R2 j 

r s t I 

|Operation J | j 

j Code J Rl | j 

l-X_X_I 

f - r --j 

I 8 | 8 | 

|Operation| | 

l Code j I j 

f 8 ”1** 1*4 ju U2 1 ! 

|Operation! ill! 
j Code |Rljx2|B2 jr>2 j 

_l_J.-JL-X-J 

r-r—r— t— i—i 

I 8 14 14 j 4 112! 

1 OperationJ 1 1 I 1 

1 Code |Rl|R3J B2 J D2j 

r--r— t— r—r—i 

1 8 14 J J4 J12J 

|Operation| till 
j Code )R1j j B2 j D2 j 

\ 8 1 

j Operation! \ 1 | 

| Code 1 12 )B11Dl1 

F 8 "j 17112] 

|Operation1 1 | 1 

| Code 1 |B11Dl| 

r-r—r— t— i—i— t— i 

1 8 14 J4 14 J1214 |12J 

I Operation! 1 I | | | 1 

| Code 1 LIj L2 j B1{Dl|B2]D2 j 

L-1-J-X J J_J-J 

f - T - r j- r - r -1 

| 8 ) 8 |4 } 12)4 112] 

jOperation! 11111 

f Code J L_| Bl | Dl | B 21P 21 


—4— 


(See Notes 1, 6, 8, and 9) 

+-+ 

R1.D2(X2,B2) 

Rl, D2 (, B2) 

Rl#S2(X2) 

(See notes 1-4, 7, and 9) 


ASSEMBLER OPERAND 
FIELD FORMAT 


Rl,R2 


Rl 


APPLICABLE INSTRUCTIONS 

All RR instructions 
except SPM and SVC 


SPM 


Rl, R3, D2(B2) 
R1,R3,S2 


R1,D2(B2) 

Rl, S2 

(See Notes 1-3,7, and 8) 


Dl(Bl),12 
SI, 12 


D1(B1) 

SI 

(See Notes 2, 3, and 6-8) 


D1(L1,B1),D2(L2,B2) 

S1(L1),S2(L2) 


Dl(L,Bl) , D2(B2) 

S1(L),S2 

(See Notes 2,3,5, and 7) 


SVC 


All RX instructions 




BXH,BXLE,LM, STM 


All shift instructions 


All SI instructions 
except LPSW,SSM, 
HIO,SIO,TIO,TCH,TS 


LPSW,SSM,HIO,SIO, 

TIO,TCH,TS 

-.j 


PACK,UNPK,MVO,AP, 
CP,DP,MP,SP,ZAP 


NC,OC,XC,CLC,MVC,MVN, 
M7Z,TR,TRT,ED,EDMK 


I-X- 
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Notes for Appendix C : 


1. Rl, R2, and R3 are absolute expressions that specify general or floating-point reg¬ 
isters- The general register numbers are 0 through 15; floating-point register num¬ 
bers are 0, 2, 4, and 6. 

2. Dl and D2 are absolute expressions that specify displacements. A value of 0 - 4095 
may be specified. 

3. Bl and B2 are absolute expressions that specify base registers. Register numbers are 
0-15. 

4. X2 is an absolute expression that specifies an index register. Register numbers are 
0 - 15. 

5. L, Ll , and L2 are absolute expressions that specify field lengths. An L expression 
can specify a value of 1 - 256. Ll and L2 expressions can specify a value of 1 - 16. 
In all cases, the assembled value will be one less than the specified value. 

6. I and 12 are absolute expressions that provide immediate data. The value of the 
expression may be 0 - 255. 

7. SI and S2 are absolute or relocatable expressions that specify an address. 

8. RR, RS, and SI instruction fields that are blank under BASIC MACHINE FORMAT are not 
examined during instruction execution. The fields are not written in the symbolic 
operand, but are assembled as binary zeros. 

9. Rl specifies a 4-bit mask in the BC and BCR machine instructions. 
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APPENDIX D: MACHINE-INSTRUCTION MNEMONIC OPERATION CODES 


This appendix contains a table of the mnemonic operation codes for 
all machine instructions that can be represented in assembler 
language, including extended mnemonic operation codes. It is in 
alphabetic order by instruction. Indicated for each instruction are 
both the mnemonic and machine operation codes, explicit and 
implicit operand formats, program interruptions possible, and condition 
code set. 

The column headings in this appendix and the information each 
column provides follow. 

Instruction: This column contains the name of the instruction 
associated with the mnemonic operation code. 

Mnemonic Operation Code: This column gives the mnemonic 
operation code for the machine instruction. This is written in the 
operation field when coding the instruction. 

Machine Operation Code: This column contains the hexadecimal 
equivalent of the actual machine operation code. The operation code 
will appear in this form in most storage dumps and when displayed on 
the system control panel. For extended mnemonics, this column also 
contains the mnemonic code of the instruction from which the extended 
mnemonic is derived. 


Operand Format: This column shows the symbolic format of the 
operand field in both explicit and implicit form. For both forms, 

Rl, R2, and R3 indicate general registers in operands one, two, and 
three respectively. X2 indicates a general register used as an index 
register in the second operand. Instructions which require an index 
register (X2) but are not to be indexed are shown with a 0 replacing 
X2. L, LI, and L2 indicate lengths for either operand, operand one, 
and operand two respectively. 

For the explicit format, D1 and D2 indicate a displacement and 
B1 and B2 indicate a base register for operands one and two. 

For the implicit format, D1,B1 and D2,B2 are replaced by SI 
and S2 which indicate a storage address in operands one and two. 

Type of Instruction: This column gives the basic machine format of 
the instruction (RR, RX, SI, or SS). If an instruction is included 
in a special feature or is an extended mnemonic,this is also indicated. 

Program Interruptions Possible: This column indicates the possible 
program interruptions for this instruction. The abbreviations used are: 
A - Addressing, S - Specification, Ov - Overflow, P - Protection, 
Op - Operation (if feature is not installed) and Other - other 
interruptions which are listed. The type of overflow is indicated by: 

D - Decimal, E - Exponent, or F- Floating Point. 

Condition Code Set: The condition codes set as a result of this 
instruction Gre indicated in this column. (See legend following 
the table). 
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Operand Format. (Add) 
110 













Instruction 

Type of 
Instruction 

Program Interruption 
Possible 


Condition Code Set 


A 

s 

Ov 

p 

Op 

Other 

00 

01 

10 

11 

Add 

RX 

X 

X 

F 




Sum=0 

Sum<0 

Sum>0 

Overflow 

Add 

RR 



F 




Sum=0 

Sum<0 

Sum>0 

Overflow 

Add Decimal 

SS, Decimal 

X 


D 

X 

X 

Data 

Sum=0 

Sum<0 

Sum >0 

Overflow 

Add Halfword 

RX 

X 

X 

F 




Sum=0 

Sum <0 

Sum >0 

Overflow 

Add Logical 

RX 

X 

X 





Sum=0® 

Sum 0® 

Sum= 0® 

Sum 0 ® 

Add Logical 

RR 







Sum=0® 

Sum= 0® 

Sum= 0® 

Sum 0 ® 

Add Normalized,Long 

RX,Floating Pt. 

X 

X 

E 


X 

B,C 

R 

L 

M 

P 

Add Normalized,Long 

RR,Floating Pt. 


X 

E 


X 

B,C 

R 

L 

M 

P 

Add Normalized, Short 

RX,Floating Pt. 

X 

X 

E 


X 

B,C 

R 

L 

M 

P 

Add Normalized, Short 

RR,Floating Pt. 


X 

E 


X 

B,C 

R 

L 

M 

P 

Add Unnormaiized,Long 

RX,Floating Pt. 

X 

X 

E 


X 

c 

R 

L 

M 

P 

Add Unnormalized, Long 

RR,Floating Pt. 


X 

E 


X 

c 

R 

L 

M 

P 

Add Unnormalized, Short 

RX,Floating Pt. 

X 

X 

E 


X 

c 

R 

L 

M 

P 

Add Unnormalized,Short 

RR,Floating Pt. 


X 

E 


X 

c 

R 

L 

M 

P 

Add Logical 

RX 

X 

X 





J 

K 



And Logical 

SS 

X 



X 



J 

K 



And Logical 

RR 







J 

K 



And Logical Immediate 

SI 

X 



X 



J 

K 



Branch and Link 

RX 







N 

N 

N 

N 

Branch and Link 

RR 







N 

N 

N 

N 

Branch on Condition 

RX 







N 

N 

N 

N 

Branch on Condition 

RR 







N 

N 

N 

N 

Branch on Count 

RX 







N 

N 

N 

N 

Branch on Count 

RR 







N 

N 

N 

N 

Branch on Equal 

RX, Ext.Mnemonic 







N 

N 

N 

N 

Branch on High 

RX, Ext. Mnemonic 







N 

N 

N 

N 

Branch on Index High 

RX, Ext.Mnemonic 







N 

N 

N 

N 

Branch on Index Low or Equal 

RX, Ext. Mnemonic 







N 

N 

N 

N 

Branch on Low 

RX, Ext .Mnemonic 







N 

N 

N 

N 

Branch if Mixed 

RX, Ext.Mnemonic 







N 

N 

N 

N 

Branch on Minus 

RX, Ext. Mnemonic 







N 

N 

N 

N 

Branch on Not Equal 

RX, Ext.Mnemonic 







N 

N 

N 

N 

Branch on Not High 

RX, Ext. Mnemoni c 







N 

N 

N 

N 

Branch on Not Low 

RX, Ext.Mnemonic 







N 

N 

N 

N 

Branch on Not Minus 

RX, Ext.Mnemonic 







N 

N 

N 

N 

Branch on Not Ones 

RX, Ext. Mnemoni c 







N 

N 

N 

N 

Branch on Not Plus 

RX, Ext. Mnemonic 







N 

N 

N 

N 

Branch on Not Zeros 

RX, Ext.Mnemonic 







N 

N 

N 

N 

Branch if Ones 

RX, Ext.Mnemonic 







N 

N 

N 

N 

Branch on Overflow 

RX, Ext.Mnemonic 







N 

N 

N 

N 

Branch on Plus 

RX, Ext. Mnemonic 







N 

N 

N 

N 

Branch if Zeros 

RX,Ext. Mnemonic 







N 

N 

N 

N 

Branch on Zero 

RX, Ext.Mnemonic 







N 

N 

N 

N 

Branch Unconditional 

RX, Ext.Mnemonic 







N 

N 

N 

N 

Branch Unconditional 

RR, Ext.Mnemonic 







N 

N 

N 

N 

Compare Algebraic 

RX 

X 

X 





Z 

AA 

BB 


Compare Algebraic 

RR 







Z 

AA 

BB 


Compare Decimal 

SS, Decimal 

X 




X 

Data 

z 

AA 

BB 


Compare Halfword 

RX 

X 

X 





z 

AA 

BB 


Compare Logical 

RX 

X 

X 





z 

AA 

BB 


Compare Logical 

SS 

X 

X 





z 

AA 

BB 


Compare Logical 

RR 

X 






z 

AA 

BB 


Compare Logical Immediate 

SI 

X 






z 

AA 

BB 


Compare, Long 

RX,Floating Pt. 

X 

X 



X 


z 

AA 

BB 


Compare, Long 

RR,Floating Pt. 

X 

X 



X 


z 

AA 

BB 


Compare, Short 

RX,Floating Pt. 

X 

X 



X 


z 

AA 

BB 


Compare, Short 

RR,Floating Pt. 


X 



X 


z 

AA 

BB 


Convert to Binary 

RX 

X 

X 




Data, F 

N 

N 

N 

N 

Convert to Decimal 

RX 

X 

X 


X 



N 

N 

N 

N 


Condition Code Set (Add) 
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Instruction 

Mnemonic 

Operation 

Code 

Machine 

Operation 

Code 

Operand Format 

Explicit Implicit 

Divide 

D 

5D 

R1,D2(X2,B2) or R1,D2(,B2) 

R1, S2(X2) 

or R1,S2 

Divide 

DR 

ID 

R1,R2 



Divide Decimal 

DP 

FD 

D1,(L1,B1),D2(L2,B2) 

SI (L1), S2(L2) 

or S1,S2 

Divide, Long 

DD 

6D 

R1,D2(X2,B2),or R1, D2(,B2) 

Rl,S2(X2) 

or R1,S2 

Divide, Long 

DDR 

2D 

R1,R2 



Divide, Short 

DE 

7D 

R1,D2(X2, B2)or R1,D2(,B2) 

R1,S2(X2) 

or R1,S2 

Divide, Short 

DER 

3D 

R1,R2 



Edit 

ED 

DE 

D1(L,B1),D2(B2) 

S1(L),S2 

or S1,S2 

Edit and Mark. 

EDMK 

DF 

D1{L,B1),D2(B2) 

S1(L),S2 

or S1,S2 


X 

57 

Rl, D2(X2, B2) or R1, D2(, B2) 

Rl,S2(X2) 

or R1,S2 

Exclusive Or 

XC 

D7 

D1(L,B1),D2(B2) 

S1(L),S2 

or SI,S2 

Exclusive Or 

XR 

17 

R1,R2 



Exclusive Or Immediate 

XI 

97 

D1(B1), 12 

SI, 12 


Execute 

EX 

44 

R1,D2(X2,B2) or R1,D2(,B2) 

Rl,S2(X2) 

R1,S2 

Halve, Long 

HDR 

24 

R1,R2 



Halve, Short 

HER 

34 

R1,R2 



Halt I/O 

HIO 

9E 

D1(B1) 



Insert Character 

1C 

43 

R1,D2(X2, B2) or R1,D2(,B2) 

R1,S2(X2) 

or Rl,S2 

Insert Storage Key 

ISK 

09 

R1,R2 



Load 

L 

58 

R1, D2(X2, B2) or Rl, D2(, B2) 

R1,S2(X2) 

or R1,S2 

Load 

LR 

18 

R1,R2 



Load Address 

LA 

41 

R1,D2(X2, B2) or R1,D2(,B2) 

Rl,S2(X2) 

or R1,S2 

Load and Test 

LTR 

12 

R1,R2 



Load and Test, Long 

LTDR 

22 

R1,R2 



Load and Test, Short 

LTER 

32 

R1,R2 



Load Complement 

LCR 

13 

R1,R2 



Load Complement, Long 

LCDR 

23 

R1,R2 



Load Complement, Short 

LCER 

33 

R1,R2 



Load Halfword 

LH 

48 

Rl,D2(X2,B2)or R1,D2(,B2) 

Rl, S2(X2) 

or R1,S2 

Load, Long 

LD 

68 

R1,D2(X2,B2) or R1,D2(,B2) 

R1,S2(X2) 

or R1,S2 

Load, Long 

LDR 

28 

R1,R2 



Load Multiple 

LM 

98 

R1,R3,D2(B2) 

R1,R3,S2 


Load Negative 

LNR 

11 

R1,R2 



Load Negative, Long 

LNDR 

21 

R1,R2 



Load Negative, Short 

LNER 

31 

R1,R2 



Load Positive 

LPR 

10 

R1,R2 



Load Positive, Long 

LPDR 

20 

R1,R2 



Load Positive, Short 

LPER 

30 

R1,R2 



Load PSW 

LPSW 

82 

D1(B1) 



Load, Short 

LE 

78 

R1,D2(X2,B2) or R1,D2(,B2) 

Rl,S2(X2) 

or Rl,S2 

Load, Short 

LER 

38 

R1,R2 



Move Characters 

MVC 

D2 

D1(L,B1),D2(B2) 

S1(L), S2 

or S1,S2 

Move Immediate 

MVI 

92 

D1(B1), 12 

SI,12 


Move Numerics 

MVN 

D1 

D1(L,B1),D2(B2) 

S1(L),S2 

or SI ,S2 

Move with Offset 

MVO 

FI 

D1(L1,B1),D2(L2,B2) 

S1(L1),S2(L2 

or S1,S2 

Move Zones 

MVZ 

D3 

D1(L,B1),D2(B2) 

S1(L),S2 

or SI ,S2 

Multiply 

M 

5C 

Rl,D2(X2,B2)orRl,D2(,B2) 

Rl, S2(X2) 

or Rl ,S2 

Multiply 

MR 

1C 

R1,R2 



Multiply Decimal 

MP 

FC 

D1(L1,B1),D2(L2,B2) 

S1(L1),S2(L2) 

or S1,S2 

Mulitply Halfword 

MH 

4C 

R1,D2(X2.B2) or R1,D2(,B2) 

R1,S2(X2) 

or Rl ,S2 

Multiply, Long 

MD 

6C 

R1,D2(X2,B2) or R1,D2(,B2) 

R1,S2(X2) 

or Rl, S2 

Multiply, Long 

MDR 

2C 

R1,R2 



Multiply, Short 

ME 

7C 

R1,D2(X2,B2) or R1,D2(,B2) 

Rl, S2(X2) 

or Rl,S2 

Multiply, Short 

MER 

3C 

R1,R2 



No Operation 

NOP 

47(BC 0) 

D2(X2,B2) or D2(,B2) 

S2(X2) 

or S2 


Operand Format (Divide) 
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Instruction 

Type of 
Instruction 

Program Interruptions 
Possible 

Condition Code Set 

A 

s 

Ov 

p 

Op 

Other 

00 

01 

10 

11 

Divide 

RX 

X 

X 




F 

N 

N 

N 

N 

Divide 

RR 


X 




F 

N 

N 

N 

N 

Divide Decimal 

SS, Decimal 

X 

X 


X 

X 

D, Data 

N 

N 

N 

N 

Divide, Long 

RX,Floating Pt. 

X 

X 

E 


X 

B,E 

N 

N 

N 

N 

Divide, Long 

RR, Floating Pt. 


X 

E 


X 

B,E 

N 

N 

N 

N 

Divide, Short 

RX,Floating Pt. 

X 

X 

E 


X 

B,E 

N 

N 

N 

N 

Divide, Short 

RR, Floating Pt. 


X 

E 


X 

B,E 

N 

N 

N 

N 

Edit 

SS, Decimal 

X 



X 

X 

Data 

S 

T 

U 


Edit and Mark 

SS, Decimal 

x 



X 

X 

Data 

S 

T 

U 


Exclusive Or 

RX 

X 

X 



. 


J 

K 



Exclusive Or 

SS 

X 



X 



J 

K 



Exclusive Or 

RR 







J 

K 



Exclusive Or Immediate 

SI 

X 



X 



J 

K 



Execute 

RX 

X 

X 




G 

(May be set by this instruction) 


Halve, Long 

RR,Floating Pt. 


X 



X 


N 

N 

N 

N 

Halve, Short 

RR, Floating Pt. 


X 



X 


N 

N 

N 

N 

Halt I/O 

SI 






A 

DD 

CC 

GG 

KK 

Insert Character 

RX 

X 






N 

N 

N 

N 

Insert Storage Key 

RR 

X 

X 



X 

A 

N 

N 

N 

N 

Load 

RX 

X 

X 





N 

N 

N 

N 

Load 

RR 







N 

N 

N 

N 

Load Address 

RX 







N 

N 

N 

N 

Load and Test 

RR 







J 

L 

M 


Load and Test, Long 

RR, Floating Pt. 


X 



X 


R 

L 

M 


Load and Test, Short 

RR, Floating Pt. 


X 



X 


R 

L 

M 


Load Complement 

RR 



F 




P 

L 

M 

O 

Load Complement, Long 

RR, Floating Pt. 


X 



X 


R 

L 

M 


Load Complement, Short 

RR, Floating Pt. 


X 



X 


R 

L 

M 


Load Halfword 

RX 

X 

X 





N 

N 

N 

N 

Load, Long 

RX,Floating Pt. 

X 

X 



X 


N 

N 

N 

N 

Load, Long 

RR, Floating Pt. 


X 



X 


N 

N 

N 

N 

Load Multiple 

RS 

X 

X 





N 

N 

N 

N 

Load Negative 

RR 







J 

L 



Load Negative, Long 

RR, Floating Pt. 


X 



X 


R 

L 



Load Negative, Short 

RR,Floating Pt. 


X 



X 


R 

L 



Load Positive 

RR 



F 




J 


M 

O 

Load Positive, Long 

RR, Floating Pt. 


X 



X 


R 

L 

M 


Load Positive, Short 

RR, Floating Pt. 


X 



X 


R 

L 

M 


Load PSW 

SI 

X 

X 




A 

QQ 

QQ 

QQ 

QQ 

Load, Short 

RX,Floating Pt. 

X 

X 



X 


N 

N 

N 

N 

Load, Short 

RR, Floating Pt. 


X 



X 


N 

N 

N 

N 

Move Characters 

SS 

X 



X 



N 

N 

N 

N 

Move Immediate 

SI 

X 



X 



N 

N 

N 

N 

Move Numerics 

SS 

X 



X 



N 

N 

N 

N 

Move with Offset 

SS 

X 



X 



N 

N 

N 

N 

Move Zones 

SS 

X 



X 



N 

N 

N 

N 

Multiply 

RX 

X 

X 





N 

N 

N 

N 

Multiply 

RR 


X 





N 

N 

N 

N 

Multiply Decimal 

SS, Decimal 

X 

X 


X 

X 

Data 

N 

N 

N 

N 

Multiply Halfword 

RX 

X 

X 





N 

N 

N 

N 

Multiply, Long 

RX,Floating Pt. 

X 

X 

E 


X 

B 

N 

N 

N 

N 

Multiply, Long 

RR, Floating Pt. 


X 

E 


X 

B 

N 

N 

N 

N 

Multiply, Short 

RX,Floating Pt. 

X 

X 

E 


X 

B 

N 

N 

N 

N 

Multiply, Short 

RR, Floating Pt. 


X 

E 


X 

B 

N 

N 

N 

N 

No Operation 

RX, Ext-Mnemonic 







N 

N 

N 

N 


Condition Code Set (Divide) 
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Instruction 

Mnemonic 

Operation 

Code 

Machine 

Operation 

Code 

Operand Format 

Explicit Implicit 

No Operation 

NO PR 

07(BCR 0) 

R2 



Or Logical 

O 

56 

R1,D2(X2,B2) or R1,D2(,B2) 

Rl,S2(X2) 

or Rl,S2 

Or Logical 

OC 

D6 

D1(L,B1),D2(B2) 

S1(L),S2 

or S1,S2 

Or Logical 

OR 

16 

R1,R2 



Or Logical Immediate 

Ol 

96 

DT(B1), 12 

SI,12 


Pack 

PACK 

F2 

D1(L1,B1),D2(L2,B2) 

S1(L1),S2(L2) 

or SI ,S2 

Read Direct 

RDD 

85 

D1(B1), 12 

SI,12 


Set Program Mask 

SPM 

04 

R1 



Set System Key 

SSK 

08 

R1,R2 



Set System Mask 

SSM 

80 

D1(B1) 

SI 


Shift Left Double Algebraic 

SLDA 

8F 

R1,D2(B2) 

Rl, S2 


Shift Left Double Logical 

SLDL 

8D 

R1,D2(B2) 

Rl, S2 


Shift Left Single Algebraic 

SLA 

8B 

R1,D2(B2) 

Rl, S2 


Shift Left Single Logical 

SLL 

89 

Rl, D2(B2) 

Rl, S2 


Shift Right Double Algebraic 

SR DA 

8E 

R1,D2(B2) 

R1,S2 


Shift Right Double Logical 

SRDL 

8C 

R1,D2(B2) 

R1,S2 


Shift Right Single Algebraic 

SRA 

8A 

R1,D2(B2) 

R1, S2 


Shift Right Single Logical 

SRL 

88 

R1,D2(B2) 

Rl, S2 


Start I/O 

SIO 

9C 

D1(B1) 

SI 


Store 

ST 

50 

R1,D2(X2,B2) or R1,D2(,B2) 

Rl,S2(X2) 

or Rl ,S2 

Store Character 

STC 

42 

R1,D2(X2,B2) or R1,D2(,B2 

Rl, D2(X2) 

or Rl ,S2 

Store Halfword 

STH 

40 

R1,D2(X2,B2) or R1,D2(,B2) 

Rl,S2(X2) 

or Rl,S2 

Store Long 

STD 

60 

R1,D2(X2,B2) 

R1,S2(X2) 

or Rl ,S2 

Store Multiple 

STM 

90 

Rl ,R2, D2(B2) 

Rl, R2, S2 


Store Short 

STE 

70 

R1,D2(X2,B2) or R1,D2(,B2) 

Rl,S2(X2) 

or Rl ,S2 

Subtract 

S 

5B 

R1,D2(X2 

Rl,S2(X2) 

or Rl,S2 

Subtract 

SR 

IB 

Rl ,R2 



Subtract Decimal 

SP 

FB 

D1(L1,B1),D2(L2,B2) 

S1(L1), S2(L2) 

or SI, S2 

Subtract Halfword 

SH 

4B 

Rl, D2(X2, B2) or R1,D2(,B2) 

Rl,S2(X2) 

or Rl ,S2 

Subtract Logical 

SL 

5F 

R1,D2(X2,B2) or R1,D2(,B2) 

Rl,S2(X2) 

or Rl,S2 

Subtract Logical 

SLR 

IF 

Rl ,R2 



Subtract Normalized, Long 

SD 

6B 

Rl, D2(X2, B2) or R1,D2(,B2) 

R1,S2(X2) 

or Rl,S2 

Subtract Normalized, Long 

SDR 

2B 

Rl ,R2 



Subtract Normalized, Short 

SE 

7B 

R1,D2(X2,B2) or R1,D2(,B2) 

Rl,S2(X2) 

or Rl ,S2 

Subtract Normalized, 

SER 

3B 

Rl ,R2 



Subtract Unnormalized, Long 

SW 

6F 

Rl ,D2(X2, B2) or R1,D2(,B2) 

R1,S2(X2) 

or Rl, S2 

Subtract Unnormalized, Long 

SWR 

2F 

Rl ,R2 



Subtract Unnormalized, Short 

SU 

7F 

R1,D2(X2,B2) or Rl, D2(,B2) 

Rl, S2(X2) 

or Rl,S2 

Subtract Unnormalized, Short 

SUR 

3F 

Rl ,R2 



Supervisor Call 

SVC 

0A 

1 



Test and Set 

TS 

93 

D1(B1) 

SI 


Test Channel 

TCH 

9F 

D1(B1) 

SI 


Test I/O 

TIO 

9D 

D1(B1) 

SI 


Test Under Mask 

TM 

91 

D1(B1), 12 

SI,12 


Translate 

TR 

DC 

D1(L,B1),D2(B2) 

S1(L),S2 

orSl, S2 

Translate and Test 

TRT 

DD 

D1(L, B1),D2(B2) 

SI (L), S2 

orSl, S2 

Unpack 

UNPK 

F3 

D1 (L1, B1), D2(L2, B2) 

S1(L1),S2(L2) 

or SI,S2 

Write Direct 

WRD 

84 

D1(B1),|2 

SI,12 


Zero and Add Decimal 

ZAP 

F8 

D1(L1,B1),D2(L2,B2) 

S1(L1),S2(L2) 

or SI, S2 


Operand Format (No Operation) 
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Instruction 

Type of 
Instruction 

Program Interruptions 
Possible 

Condition Code Set 

A 

s 

Ov 

p 

Op 

Other 

00 

01 

10 

11 

No Operation 

RR, Ext.Mnemonic 







N 

N 

N 

N 

Or Logical 

RX 

X 

X 





J 

K 



Or Logical 

SS 

X 



X 



J 

K 



Or Logical 

RR 







J 

K 



Or Logical Immediate 

SI 

X 



X 



J 

K 



Pack 

SS 

X 



X 



N 

N 

N 

N 

Read Direct 

SI 

X 



X 

X 

A 

N 

N 

N 

N 

Set Program Mask 

RR 







RR 

RR 

RR 

RR 

Set Storage Key 

RR 

X 

X 



X 

A 

N 

N 

N 

N 

Set System Mask 

SI 

X 





A 

N 

N 

N 

N 

Shift Left Double Algebraic 

RS 


X 

F 




J 

L 

M 

O 

Shift Left Double Logical 

RS 


X 





N 

N 

N 

N 

Shift Left Single Algebraic 

RS 



F 




J 

L 

M 

O 

Shift Left Single Logical 

RS 







N 

N 

N 

N 

Shift Right Double Algebraic 

RS 


X 





J 

L 

M 


Shift Right Double Logical 

RS 


X 





N 

N 

N 

N 

Shift Right Single Algebraic 

RS 







J 

L 

M 


Shift Right Single Logical 

RS 







N 

N 

N 

N 

Start I/O 

SI 






A 

MM 

CC 

EE 

AA 

Store 

RX 

X 

X 


X 



N 

N 

N 

N 

Store Character 

RX 

X 



X 



N 

N 

N 

N 

Store Halfword 

RX 

X 

X 


X 



N 

N 

N 

N 

Store Long 

RX, Floating Pt. 

X 

X 


X 

X 


N 

N 

N 

N 

Store Multiple 

RS 

X 

X 


X 



N 

N 

N 

N 

Store Short 

RX,Floating Pt. 

X 

X 


X 

X 


•N 

N 

N 

N 

Subtract 

RX 

X 

X 

F 




V 

X 

Y 

O 

Subtract 

RR 



F 




V 

X 

Y 

O 

Subtract Decimal 

SS, Decimal 

X 


D 

X 

X 

Data 

V 

X 

Y 

O 

Subtract Halfword 

RX 

X 

X 

F 




V 

X 

Y 

O 

Subtract Logical 

RX 

X 

X 






W,H 

V,l 

W,l 

Subtract Logical 

RR 








W,H 

V,l 

W,l 

Subtract Normalized,Long 

RX,Floating Pt. 

X 

X 

E 


X 

B,C 

R 

L 

M 

Q 

Subtract Normalized, Long 

RR, Floating Pt. 


X 

E 


X 

B,C 

R 

L 

M 

Q 

Subtract Normalized,Short 

RX,Floating Pt. 

X 

X 

E 


X 

B,C 

R 

L 

M 

Q 

Subtract Normalized,Short 

RR,Floating Pt. 


X 

E 


X 

B,C 

R 

L 

M 

Q 

Subtract Unnormalized, Long 

RX,Floating Pt. 

X 

X 

E 


X 

c 

R 

L 

M 

Q 

Subtract Unnormalized, Long 

RR,Floating Pt. 


X 

E 


X 

c 

R 

L 

M 

Q 

Subtract Unnormalized, Short 

RX,Floating Pt. 

X 

X 

E 


X 

c 

R 

L 

M 

Q 

Subtract Unnormalized, Short 

RR, Floating Pt. 


X 

E 


X 

c 

R 

L 

M 

Q 

Supervisor Call 

RR 







N 

N 

N 

N 

Test and Set 

SI 

X 



X 



SS 

TT 



Test Channel 

SI 






A 

JJ 

II 

FF 

HH 

Test I/O 

SI 






A 

LL 

CC 

EE 

KK 

Test Under Mask 

SI 

X 






UU 

VV 


WW 

Translate 

SS 

X 



X 



N 

N 

N 

N 

Translate and Test 

SS 

X 






PP 

NN 

OO 


Unpack 

SS 

X 



X 



N 

N 

N 

N 

Write Direct 

SI 

X 




X 

A 

N 

N 

N 

N 

Zero and Add Decimal 

SS, Decimal 

X 

_ 

D 

X 

X 

Data 

J 

L 

M 

O 


Condition Code Set (No Operation) 
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Program Interruptions Possible 


Under Ov: D = Decimal 
E =Exponent 
F = Fixed Point 

Under Other: 

A Privileged Operation 
B Exponent Underflow 
C Significance 
D Decimal Divide 

E Floating Point Divide 

F Fixed Point Divide 
G Execute 

Condition Code Set 

H No Carry 

I Carry 

J Result = 0 

K Result is Not Equal to Zero 

L Result is Less Than Zero 

M Result is Greater Than Zero 

N Not Changed 

O Overflow 

P Result Exponent Underflows 

Q Result Exponent Overflows 

R Result Fraction = 0 

S Result Field Equals Zero 

T Result Field is Less Than Zero 

U Result Field is Greater Than Zero 

V Difference = 0 

W Difference is Not Equal to Zero 

X Difference is Less Than Zero 

Y Difference is Greater Than Zero 

Z First Operand Equals Second Operand 

AA First Operand is Less Than Second Operand 
BB First Operand is Greater Than Second Operand 

CC CSW Stored 

DD Channel and Subchannel not Working 

EE Channel or Subchannel Busy 

FF Channel Operating in Burst Mode 

GG Burst Operation Terminated 

HH Channel Not Operational 

II Interruption Pending in Channel 

JJ Channel Available 

KK Not Operational 

LL Available 

MM I/O Operation Initiated and Channel Proceeding With its Execution 
NN Nonzero Function Byte Found Before the First Operand Field is Exhausted 
OO Last Function Byte is Nonzero 

PP All Function Bytes Are Zero 

QQ Set According to Bits 34 and 35 of the New PSW Loaded 

RR Set According to Bits 2 and 3 of the Register Specified by R1 

SS Leftmost Bit of Byte Specified = 0 

TT Leftmost Bit of Byte Specified = 1 

UU Selected Bits Are All Zeros; Mask is All Zeros 
W Selected Bits Are Mixed (xeros and ones) 

WW Selected Bits Are All Ones 


Program Interruptions Possible 
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APPENDIX E: ASSEMBLER INSTRUCTIONS 


| Operation | I I 

j Entry j Name Entry | Operand Entry j 

i i - . j. .... . ... j 

j ACTR | Not used* must not be present | An arithmetic SETA expression j 

j AGO | A sequence symbol or not present 

A sequence symbol | 

t — T — - — 

| AIF | A sequence symbol or not present 

1 1 

1 J 

A logical expression enclosed in I 

parentheses, immediately followed by a| 
sequence symbol | 

h- 1 

Not used, must not be present | 

- 4 

Four operands, separated by commas | 

Two absolute expressions, separated byj 

a comma j 

Not used, must not be present j 

-1 

A symbol | 

Not used, must not be present | 

One operand j 

j ANOP j A sequence symbol 

j CCW { Any symbol or not present 

| CNOP j A sequence symbol or not present 

! J 

j COM j A sequence symbol or not present 

j COPY j Not used, must not be present 

j CSECT j Any symbol or not present 

j DC j Any symbol or not present 

J DROP | A sequence symbol or not present | One to sixteen absolute expressions, 

J j | separated by commas 

j DS j Any symbol or not present j One operand 

j DSECT j A variable symbol or an j Not used, must not be present 

| j ordinary symbol j 

| EJECT | A sequence symbol or not present 

Not used, must not be present j 

A relocatable expression j 

or not present j 

One or more relocatable symbols, sepa-j 
rated by commas j 

An absolute or relocatable expression j 

1 END j A sequence symbol 

j j or not present 

i t _ 

1 a 

j ENTRY | A sequence symbol or not present 

! { 

j EQU j A variable symbol or an 

j j ordinary symbol 

| EXTRN j A sequence symbol or not present 

One or more relocatable symbols, sepa-j 

rated by commas j 

- 1 

One or more variable symbols that are | 

to be used as SET symbols, separated j 

by commas 3 j 

One or more variable symbols that are j 
to be used as SET symbols, separated j 

by commas 3 j 

L J 

| GBLA | Not used, must not be present 

1 1 

1 j 

| GBLB j Not used, must not be present 

t 1 

1 j 

J GBLC j Not used, must not be present 

1 I 

1 | 

1 

One or more variable symbols that are | 
to be used as SET symbols, separated j 
by commas 3 j 

j 

j ICTL j Not used, must not be present 

1 1 

1 

One to three decimal values, separated| 
by commas | 
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| LCLC | 

1 I 

ltorg 

MACRO 1 

MEND 1 

1 

_j_ 

1 1 
_J_ 

—j- 

1 

_l_ 

MEXIT* 

1 J 

_j_ 

1 MNOTE 1 | ; 


Operation 

Entry 


LCLA 


| Not used, must not be present 


j Not used, must not be present 


Not used, must not be present 


| - 

j ORG 

| PRINT 
[ PUNCH 


repro 

SETA 

SETB 




Name Entry 

Not used, must not be present 


Any symbol or not present 


Not used, must not be present 1 

- ± 

A sequence symbol or not present | 


j Operand Entry j 

I Two decimal values, separated by a 
j comma 

j One or more variable symbols that are 
I to be used as SET symbols, separated 
j by commas 2 

j One or more variable symbols that are 
j to be used as SET symbols, separated 
j by commas 2 

j One or more variable symbols separated 
j by commas 2 

J Not used, must not be present 

“I- 

j Not used, must not be present 


A sequence symbol or not present 

A sequence symbol, a variable 
symbol or not present 


| A sequence symbol or not used 
j A sequence symbol or not present 
] A sequence symbol or not present 




A sequence symbol or not used 
A SETA symbol 
A SETB symbol 


A SETC symbol 


j.--|- 

| SPACE j A sequence symbol or not present 

I I__ 

| START I Any symbol or not present 


TITLE 3 | A special symbol (0 to 4 charac- | One to 
j ters), a sequence symbol, a j apostr 

j variable symbol, or not present | 

| USING j A sequence symbol or not present j An abs 


Not used, must not be present 


Not used, must not be present 


j A severity code, followed by a comma, j 
j followed by any combination of charac-| 
j ters enclosed in apostrophes j 

j A relocatable expression or not used j 

j One to three operands j 


. present | One to eighty characters enclosed in | 

j apostrophes j 

used | Not used, must not be present j 

j An arithmetic expression j 

j A 0 or a 1, or logical expression J 
j enclosed in parentheses j 

j A type attribute, a character expres- j 
( sion, a substring notation, or a con- | 
j catenation of character expressions | 

j and substring notations j 

- + --I 

present j A decimal self-defining term or not 1 

j used j 

t j A self-defining term or not used j 

charac- j One to 100 characters, enclosed in j 

, a j apostrophes | 


j USING | A sequence symbol or not present j An absolute or relocatable expression J 
| j j followed by 1 to 16 absolute expres- j 
j j j sions, separated by commas j 

1 *-May only be used as part of a macro-definition. j 
j 2 SET symbols may be defined as subscripted SET symbols. j 
I 3 See Section 5 for the description of the name entry. j 
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ASSEMBLER STATEMENTS 


| INSTRUCTION 

(Model Statements 3 * 

| (A variable symbol or any 
(assembler language mnemonic 
(operation code except COPY, 
jEND, ICTL, ISEQ, and PRINT 

I 

k - 

(Prototype Statement 3 


J NAME ENTRY 

(An ordinary symbol, variable 
iy (symbol, sequence 
•nic(symbol, a combination of 
PY,(variable symbols and other 
NT (characters that is equivalent 
j to a symbol, or not used 

(A symbolic parameter or 
(not used 


OPERAND ENTRY 


t - 

(Macro-Instruction 
1 Statement 3 


(Assembler Language 
(Statement 3 *» 


(An ordinary symbol, a 
(variable symbol, a sequence 
(symbol, a combination of 
jvariable symbols and other 
(characters that is equivalent 
(to a symbol, 3 or not used 

(An ordinary symbol, a var- 
jiable symbol, a sequence 
|symbol, a combination 
(of variable symbols and 
|other characters that is 
(equivalent to a symbol, 

|or not used 


Any combination of char¬ 
acters (including variable 
symbols) 


mbolic parameter or (Zero or more operands that ( 

used (are symbolic parameters, j 

(separated by commas, followed} 
(by zero or more operands j 

J (separated by commas) of the J 
(form symbolic parameter, j 

(equal sign, optional standard] 
J va lue j 

rdinary symbol, a (Zero or more positional | 

able symbol, a sequence joperands separated by commas,j 

ol, a combination of (followed by zero or more j 

able symbols and other (keyword operands (separated j 

acters that is equivalent(by commas) of the form | 

symbol, 3 or not used (keyword, equal sign, value 3 j 

rdinary symbol, a var- (Any combination of characters! 

e symbol, a sequence |(including variable symbols) j 


3 May only be used as part of a macro-definition. 

3 Variable symbols appearing in a macro-instruction are 
replaced by their values before the macro-instruction is 
processed. 

3 Variable symbols may not be used to generate the follow¬ 
ing mnemonic operation codes: ACTR, COPY, END, ICTL, 
CSECT, DSECT, ISEQ, PRINT, REPRO, and START. Variable 
symbols may not be used in the name and operand entries 
of the following instructions: COPY, END, ICTL, and ISEQ. 
Variable symbols may not be used in the name entry of the 
ACTR instruction. 

* The line following a REPRO statement may not contain 
variable symbols. 
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APPENDIX F: SUMMARY OF CONSTANTS 


t - 

B 


as 

needed 

word 

+ + half 

word 


TYPE 








IMPLIED 

LENGTH 

(BYTES) 


+-+-- 


as 

needed 


as 

needed 




as 

needed 


as 

needed 
4 


! v 

i 

i 

i 

-(_ 

i 

i 

! 

| word 
1 

h 

s 

i 2 

i half 

1 

1 

word 


ALIGN¬ 

MENT 


byte 


byte 


byte 


word 


double 

word 


byte 


- -1 - 4 - 

1 to 
16 


byte 


word 


half 

word 


LENGTH 

MODI¬ 

FIER 

RANGE 




1 to 
256 (1) 


1 to 
256 (1) 


1 to 
256 


1 to 8 






1 to 8 


1 to 8 




1 to 8 


1 to 
16 


1 to 4 


-i 


3 or 4 


- + 

3 or 4 


2 only 


one absolute 
or relocatab¬ 
le expression] 
or two absol¬ 
ute express¬ 
ions: 
exp (exp) 


1 or 2 

2 only 


SPECIFIED 

BY 


characters 


one 


left 


hexadecimal 
digits 


binary 

digits 


decimal 

digits 




decimal 

digits 


decimal 

digits 


decimal 

digits 




decimal 

digits 




an absolute 
expression 

a relocatable 
or complex 
relocatable 
expression 


relocatable 

symbol 


an absolute 
expression 




a relocatable 
or complex 
relocatable 
expression 


-■f 


CON¬ 

STANTS 

PER 

OPERAND 


one 


one 


multiple 


multiple 


multiple 


-85 to 
♦ 75 

-85 to 
♦75 


multiple 


multiple 


decimal | multiple 

digits 

multiple 


multiple 


multiple 


multiple 


RANGE 
FOR EX¬ 
PONENTS 


—85 to 
♦ 75 


-85 to 
♦75 


RANGE 

FOR 

SCALE 


TRUN¬ 
CATION/ 
PADDING 
SIDE 


-187 to 
♦346 


-187 

♦346 


0 to 14 


left 
right 


0 to 14] right 


* left ^ 


right 


left 


left 


left 

-4-i 

left 


+ left ^ 


* left ^ 




(1) In a DS assembler instruction, C and X type constants nay have length specification 
to 65535, 
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APPENDIX G; MACRO FACILITY SUMMARY 


The four charts in this appendix summarize Chart 3 is a summary of the attributes 

the macro facility described in Part 2 of that may be used in each expression, 
this publication. 

Chart 1 indicates which macro facility Chart 4 is a summary of the variable 

elements may be used in the name and oper- symbols that may be used in each expres¬ 
and entries of each statement. sion. 

Chart 2 is a summary of the expressions 
that may be used in macro-instruction 
statements. 
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Chart 1. Macro Facility Elements 


Statement 

Variable Symbols 

Attributes 

Sequenc 

Symbol 

Global SET Symbols 

Local SET Symbols 

System Variable Symbols 

Symbolic 

Parameter 

SETA 

SETB 

SETC 

SETA 

SETB 

SETC 

&SYSNDX 

&SYSECT 

&SYSLIST 

Type 

Length 

Scaling 

Integer 

Count 

Number 

MACRO 


















Prototype 

Statement 

Name 

Operand 

















GBLA 


Operand 
















GBLB 



Operand 















GBLC 




Operand 














LCLA 





Operand 













LCLB 






Operand 












LCLC 







Operand 











Model 

Statement 

Name 

Operation 

Operand 

Name 

Operation 

Operand 

Name 

Operation 

Operand 

Nam* 

Operation 

Operand 

Name 

Operation 

Operand 

Name 

Operation 

Operand 

Name 

Operation 

Operand 

Name 

Operation 

Operand 

Name 

Operation 

Operand 

Name 

Operation 

Operand 

■ 

■ 

■ 

■ 

■ 

■ 

Name 

COPY 

















Name 

SETA 

Operand^ 

Name 

Operand 

Operand® 

Operand^ 

Name 

Operand 

a 

Operand 

o 

Operand 

Operand 


Operand® 


Operand 

Operand 

Operand 

Operand 

Operand 


SETS 

Operand^ 

Operand^ 

Name 

Operand 

Operand^ 

Operand^ 

Name 

Operand 

Operand^ 

Operand^ 

Operand^ 

Operand^ 

Operand^ 

Operand”* 

Operand”* 

Operand”* 

Operand^ 

Operand** 


SETC 

Operand 

Operand 1 * * * * * 7 8 

Operand® 

Name 

Operand 

Operand' 7 

Operand® 

Name 

Operand 

Operand 

Operand 

Operand 

Operand 







AIF 

Operand^ 

Operand^ 

Operand 

Operand^ 

Operand^ 

Operand 

Operand^ 

Operand^ 

Operand^ 

Operand^ 

Operand^ 

Operand^ 

Operand^ 

Operand** 

Operand^ 

Operand** 

Name 

Operand 

AGO 

















Name 

Operand 

ACTR 

Operand^ 

Operand 

Operand® 

Operand^ 

Operand 

Operand® 

Operand® 

Operand 


Operand® 


Operand 

Operand 

Operand 

Operand 

Operand 


ANOP 

















Name 

MEXIT 

















Name 

MNOTE 

Operand 

Operand 

Operand 

Operand 

Operand 

Operand 

Operand 

Operand 

Operand 

Operand 







Name 

MEND 

















Name 

Outer 

Macro 


Name 

Operand 

Name 

Operand 

Name 

Operand 

Name 

Operand 

Name 

Operand 

Name 

Operand 




■ 






Name 

Inner 

Macro 

Name 

Operand 

Name 

Operand 

Name 

Operand 

Name 

Operand 

Name 

Operand 

Name 

Operand 

Name 

Operand 

Name 

Operand 

Name 

Operand 

Name 

Operand 







Name 

Assembler 

Language 

Statement 


Name 

Operation 

Operand 

Name 

Operation 

Operand 

Name 

Operation 

Operand 

Name 

Operation 

Operand 

Name 

Operation 

Operand 

Name 

Operation 

Operand 


■ 

■ 

■ 

■ 

■ 

■ 

■ 

■ 

Name 


1 . Variable symbols in macro-instructions are replaced by their values before processing. 

2. Only if value is self-defining term. 

3. Converted to arithmetic +1 or +0. 

4. Only in character relations. 

5. Only in arithmetic relations. 

6. Only in arithmetic or character relations. 

7. Converted to unsigned number. 

8 . Converted to character 1 or 0. 

9. Only if one to eight decimal digits. 
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Chart. 2. Expressions 


Logical Expressions] 


j Expression | Arithmetic Expressions 


4 - 


Character Expressions 


May 

contain 


Operators 
are 

Range 
of values 

May be 
used in 


1. Self-defining terms 

2. Length, scaling, 
integer, count, and 
number attributes 

3. SETA and SETB symbols 

4. SETC symbols whose 
value is 1-8 decimal 
digits 

5- Symbolic parameters 
if the corresponding 
operand is a self¬ 
defining terra 

6. SSYSLIST(n) if the 
corresponding operand 
is a self-defining 
term 

7. 6SYSLIST(n,m) if the 
corresponding operand 
is a self-defining 
term 

8. &SYSNDX 

and / 

parentheses permitted 


1. Any combination of 
characters enclosed 
in apostrophes 

2. Any variable symbol 
enclosed in apos¬ 
trophes 

3. A concatenation of 
variable symbols and 
other characters 
enclosed in apos¬ 
trophes 

4. A request for a type 
attribute. 


1. SETB symbols 

2. Arithmetic re¬ 
lations 4 

3. Character re¬ 
lations 2 


con cat enat ion 
period (.) 


with a 


AND, OR, and NOT 
parentheses per¬ 
mitted 


-H 


-2 31 to +2 34 -l 


through 127 characters 


1. 

2 . 

3. 

4. 

5. 

6. 

7. 

8 . 




+ 


SETA operands 
Arithmetic relations 
Subscripted SET 
symbols 
SSYSLIST 

Substring notation 
Sublist notation 
SETC operands 
ACTR operands 


1. 

2 . 

3. 


SETC operands 3 
Character relations 3 
SETA operands 1 * 


0 
1 

-+- 


(false) 

(true) 


or 


1. SETB operands 

2. AIF operands 


-+~ 




-H 


An arithmetic relation consists of two arithmetic expressions related by the opera¬ 
tors GT, LT, EQ, NE, GE, or LE. 

A character relation consists of two character expressions related by the operator 
GT, LT, EQ, NE, GE, or LE. The type attribute notation and the substring notation 
may also be used in character relations. The maximum length of the character 
expressions that can be compared is 127 characters. If the two character expres¬ 
sions are of unequal length, then the shorter one will always compare less than the 
longer. 

Maximum of eight characters will be assigned. 

If one to eight decimal digits. 
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Chart 3. Attributes 


} Attribute 

I 

| Type 


JNotation 

I _ 

| T* 


| Length 


[scaling 


JInteger 


| Count 


•J- 

I L* 


I S* 


Number 


4 - 

I i* 


Y K* 


May be used with: 


Symbols outside 
macro-definitions; 
symbolic parameters, 
SSYSLIST(n), and 
€SYSLIST(n,ra) inside 
macro-definitions 

Symbols outside 
macro-definitions; 
symbolic parameters, 
fcSYSLIST(n), and 
6SYSLIST(n,ra) inside 
ma cro-def init ions 

Symbols outside 
macro-definitions; 
symbolic parameters, 
SSYSLIST(n), and 
SSYSLIST(n,m) inside 
ma cro-de finitions 


Any letter except 
M,N,0,T, and U 


|h,F,G,D,E,K,P, and Z 


Symbols outside 
macro-definitions; 
symbolic parameters, 
£SYSLIST(n>, and 
SSYSLIST(n,m) inside 
macro-definitions 

Symbolic parameters 
corresponding to 
ma cro-instruction 
operands, SSYSLIST 
(r.), and £SYSLIST(n,m) 
inside macro¬ 
definitions 


Symbolic parameters, 
6SYSLIST, and 
SSYSLIST(n) inside 
macro-definitions 


May be used only if 
type attribute is: 

(May always be used) 


H,F,G,D,E,K,P, and Z 


JAny letter 


Any letter 




May be used in 


1. SeTC operand J 

fields J 

2. Character j 

relations j 

(SETB) I 


Arithmetic 

expressions 


Arithmetic | 

expressions j 


Arithmetic 

expressions 


■J- 

| Arithmetic 
j expressions 


^- 

j Arithmetic 
jexpressions 
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Chart 4. Variable Symbols 


Variable 

symbol 

Symbolics- 

parameter 


SETB 


^SETC 


"I- 


SETA 


LCLB or GBLB 
instruction 




^fiSYSNDXS- 


^SSYSECT 1 


^SSYSLIST 3 - 

^fcSYSLlST(n) A 
6SYSLIST(n,m) 1 


Defined by: 


Prototype 

statement 


Initialized, 
or set to: 

Corresponding 
macro-instruction 
operand 




LCLA or GBLA 
instruction 


+ - 


LCLC or GBLC 
instruction 


The assembler 




The assembler 


The assembler 


The assembler 


Null character 
value 


I SETA 

instruction 
| SETB 

instruction 
^SETC 

instruction 


Macro-instruction 
index 


(Constant 
throughout 
definition; 
unique for 
each macro¬ 
instruction) 


Control section 
in which macro- 
instruction 
appears 




Not applicable 




Corresponding 
macro-instruction 
operand 


Value changed 
by: 

(Constant 
throughout 
definition) 


(Constant 
throughout 
definition; 
set by CSECT, 
DSECT, and 
START) 

Not applicable 


(Constant 
throughout 
definition) 


| 1 May only be used in macro-definitions. 


May be used in: 


1. Arithmetic expressions 
if operand is self- 
defining term 

2. Character expressions 

-—- 1 

1. Arithmetic expressions 

2. Character expressions 

1. Arithmetic expressions 

2. Character expressions 

3. Logical expressions 

1* Arithmetic expressions 
if value is one to 
eight decimal digits 
2. Character expressions 

1. Arithmetic expressions 

2. Character expressions 


Character expressions 


N* 6SYSLIST in arithmetic 
expressions 

- + - 4 

1. Arithmetic expressions 
if operand is self- 
defining term 

2. Character expressions 
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APPENDIX H: DICTIONARY AND SOURCE STATEMENT SIZES 


PART Is DICTIONARIES DSED IN MACRO GENERATION 


A- Dictionaries at Collection Time 


For the Macro Generator portion of the Assembler to accomplish macro generation and 
conditional assembly, two or more dictionaries must be constructed: a Global Dic¬ 
tionary and one or more Local Dictionaries. 

Global Dictionary 

One Global Dictionary is built for the entire program. It contains macro-instruction 
mnemonics and global SET variable names. The capacity of the Global Dictionary is 64 
blocks of 256 bytes each. An entry is made for each unique macro-instruction mnemon¬ 
ic and each unique global SET variable name. Each block contains complete entries. 
Any entry not fitting into a block is placed in the next block with the remaining 
bytes in the present block unused. There is a further limit of 400 distinct global 
symbols. The entries are as follows: 

Macro Mnemonic Operation Code 10 bytes plus mnemonic* 

Global SET Variable Name 6 bytes plus name* (A dimensioned global 

SET variable is counted only once) 

Fixed Overhead 8 bytes for first block 

4 bytes for each succeeding block 

5 bytes for last block 


Local Dictionary 

For the main portion of the program, one Local Dictionary is constructed in which 
ordinary symbols (relevant to macro generation and conditional assembly), sequence 
symbols, and local SET variable names are entered. In addition, one Local Dictionary 
is constructed for each different macro definition used in the program. These Local 
Dictionaries contain one entry for each local SET variable name, sequence symbol, and 
prototype symbolic parameter declared within the macro definition. The capacity of 
each Local Dictionary is 64 blocks of 256 bytes each. Each block contains complete 
entries. Any entry not fitting into a block is placed in the next block with the 
remaining bytes in the present block unused. The following table indicates the size 
of each type of entry and will serve to relate dictionary capacities to the structure 
of any given program: 

Sequence Symbol Names 


Local SET Variable Names 


Prototype Symbolic Parameters 

Relevant ordinary symbols 
appearing in the main 
portion of the program 

Fixed overhead 


10 bytes plus name* (A reference to 
sequence symbols after definition, 
a backwards branch, causes an 
additional entry to be made 
in the local dictionary.) 

6 bytes plus name* (A dimensioned local 
SET variable is counted only once) 

5 bytes plus name* 

10 bytes plus name* 


8 bytes for first block 
(32 bytes if a macro 
local dictionary) 

4 bytes for each succeeding block 

5 bytes for last block 
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* One byte is used for each character in the name or mnemonic 


B. Dictionaries at Generation Time 


To conserve storage during the actual conditional assembly and macro generation, the 
contents of the Global Dictionary and Local Dictionaries are restructured as follows: 


Global Dictionary 
Fixed overhead 

Macro Mnemonic Operation Code 
Global SETA dimensioned 
Global SETA undimensioned 
Global SETB dimensioned 

Global SETB undimensioned 
Global SETC dimensioned 
Global SETC undimensioned 


4 bytes plus word alignment 

3 bytes 

1 byte plus 4N 

4 bytes 

1 byte plus (N/8) 

IN/8 is rounded to the next highest integer] 
1 byte 

1 byte plus 9N 
9 bytes 


Local Dictionary 
Fixed overhead 
Sequence Symbols 
Local SETA dimensioned 
Local SETA undimensioned 
Local SETB dimensioned 

Local SETB undimensioned 
Local SETC dimensioned 
Local SETC undimensioned 


20 bytes plus word alignment 
5 bytes 

1 byte plus 4N 
4 bytes 

1 byte plus (N/8) 

IN/8 is rounded to the next highest integer) 
1 byte 

1 byte plus 9N 
9 bytes 


Relevant ordinary symbols appearing in 
the main portion of the program 5 bytes 


N = dimension 


Note : Only those symbols which appear in macro instruction operands or whose attri¬ 
butes are referenced are included in this table- These entries are required only 
for the main program Local Dictionary. 

The restructured Global Dictionary and the restructured Local Dictionary for the 
main portion of the program must be resident in main storage. 

In addition, if the program contains any macro-instructions, main storage is 
required for the largest Local Dictionary of the macro-definitions being processed. 
Furthermore, if any macro-definitions contain inner macro-instructions, main storage 
is required for all the restructured Local Dictionaries of all the macros in the 
nest. 

In addition to those requirements specified above for the Local Dictionary of the main 
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portion of the program, each macro-definition Local Dictionary requires the following for 
the parameter table: 


1. Fixed overhead 


22 bytes 


2- Table Entries 

a. Character string 

b. Hexadecimal, binary, 
decimal, and character 
self-defining values 

c. Symbol 

d. Sublist 


3 bytes plus L 


7 bytes plus L 

9 bytes plus L 

10 bytes plus 2N bytes plus Y 


If Length of entry 

N=Number of entries in sublist 

¥=Total length of table entries of a., b., and c. formats 


Each nested macro-instruction also requires 
Parameter pointer list 2 bytes 
Pointers to list in table 8 bytes 


the following: 

plus 2N (N « the number of operands) 
plus word alignment 


PART 2: MACRO MNEMONIC TABLE 


As the source text is scanned, a table of macro mnemonics is constructed. There is an 
entry for each macro used or defined as a programmer macro in the program. The entries 
are made under the premise that every undefined operation is a system macro mnemonic. 

This table is then subsetted to locate and edit system macros from the library. 

An entry in this Subsetted table consists of 9 bytes. With 10,240 or 14,336 contigu¬ 
ous bytes of main storage available (see Machine Features Required ) approximately 450 
distinct macro mnemonics can be handled. When this table overflows/ processing continues 
with only those macros defined at that point. If additional storage is available, this 
table is expanded accordingly. 


PART 3: SOORCE STATEMENT COMPLEXITY - CONDITIONAL ASSEMBLY AND MACRO GENERATION 


For any statement except macro-prototype or macro instructions, a counter is increased by 
one for each literal occurrence of the following: 

1. Ordinary Symbol 

a. Name, operation, or operand entry (when the operand count starts, the counter 
is decremented by one), or 

b. Operand of an EXTRN statement, or 

c. Operand of an attribute operator (L* ,T*,1*, etc. in a SETA, SETB or SETC 
expression, or 

d. operand of a machine or assembler instruction (only if in the main portion of 
the program) 

2. Variable Symbol 

3. Sequence Symbol 

Note 1 : The maximum value the counter may attain is 35. 

Note 2 : This restriction applies to the name and operation entry of a macro-instruction 
or prototype taken as a unit. Each macro-instruction or prototype operand (in sub¬ 
list, each sublist operand) is also subject to the counter restriction. 

Examples of counts 
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1. €B2 SETB (T*NAME EQ*W* OR •gC'.'A* £Q* AA*) 

count=3 

2. EXTRN A, B, C, SC 
count=4 

PART 4: SOURCE STATEMENT COMPLEXITY; ASSEMBLER STATEMENTS 


With 10,240 or 14,336 contiguous bytes of main storage available (see Machine Features 
Required ), the size of any statement must be less than a certain limit. This limit is: 

1. 727 bytes for DC or DS statements. 

2. 743 bytes for all other statements. 

There are two formulas used to estimate the size Cin bytes) of a statement. The greater 
of the two calculated values CS* or S a ) determines whether the statement is less than the 
given limit. In general, all statements cam be processed if they contain 50 or fewer 
terms. If a statement contains more than 50 terms, the formulas should be used to deter¬ 
mine if the statement can be processed, or if the statement should be shortened using EQU 
assembler instructions. (In the example for S lf if A+(B-C)*3 were equated to a symbol, 
that symbol could be used as the displacement field of the first operand.) The formulas 
for statement size, S x and S a , follow. 

Si = N B *N D +4(N LS ^N SD )+6(N S ^N L ) 

N b = the total number of bytes in name, operation, operand, and comments entries. 

(The maximum value of N B is 187.) 

N D = the number of operators and delimiters in the operand entry [except equal (=), 
period (.), and apostrophe (*)) 

N LS = the number of references to length attribute (L*SYMBOL), 

n SD = the number of self-defining terras, 

N s = the number of symbolic terms (including *), 

Nl = the number of literal operands. (The maximum is 1.) 

Example: 

NAME MVC A+(B-C)* 3(L* D,5),=15 CL5 * ABCDEFG* 

Sj.=39+9+4(l*4) +6 (3+1) 

=92 bytes 


S a = Ng ♦ 9(Wi ♦ W a ♦.♦Wj, ♦N E )+N ED 

N b = the total number of bytes in name, operation, operand, and comments entries. 
(The maximum value of N B is 187). 

W A +W a ......+Wi = a weight associated with the 1st, 2nd, .........,i th expression. 

= 1, if the expression is: 

a. absolute, 

b. simply relocatable, or 

c. in error. 

If the expression is complexly relocatable, W ^ depends on the number of 
unpaged control section numbers (N ESD ). 


r 

— r~ 

-- 

■1 

I n esd 

1 


I 

1-- 

—+- 

— 

* 

11 

1 

1 


12, 3, 4, or 5 

1 

2 


j 6, 7, 8, or 9 

I 

3 


|10, 11, 12, or 

13 | 

4 


J14, 15, or 16 

1 

_X. 

5 



Appendix H 129 









N E = the number of expressions. 

Ned = the number of expression delimiters. 

The rules for counting the number of expressions (N E ) and the number of expression delim¬ 
iters (N ED ) are: 


1. Expression delimiters are commas and the terminating blank of an operand. 

2. Left and right parentheses can be part of an expression or can be expression delimi¬ 
ters. A left or right parenthesis is an expression delimiter if it ends an expres¬ 
sion. Otherwise, it is part of an expression. 


Example 1 : The operand is: 

5,6,A+20*B(6,7) 

The expression delimiters are the three commas, the left parenthesis [O, the 
right parenthesis [)3, and the terminating blank. 

The first, second, fourth, and fifth expressions all have a weight of 1. The 
third expression in the operand [A+20+B] has a weight of 1 (either B is abso¬ 
lute, making the result absolute or simply relocatable or, B is relocatable 
so the expression is in error. 

S a = N B + 9(W X ♦ W 2 ♦ W 3 + W 4 ♦ W 5 + N e > «■ N ed 
Sa - H b ♦ »(1 ♦ 1 ♦ 1 ♦ 1 ♦ 1 ♦ 5> ♦ 6 
Sa - N b ♦ 96 bytes 
Example 2 : The operand is: 

A+17*(C—D),(A+20) 

The number of expressions (N E ) is 2. The first expression is A+17*(C-D). 

The second expression is (A+20). 

The number of expression delimiters <N ED ) is 2 (the comma and the terminating 
blank). 


Example 3 : The operand is: 

20(5,3),16(5) 


There are 5 expressions and 7 expression delimiters. 


Expression 1 = 20 
Expression 2 = 5 
Expression 3 = 3 
Expression 4 = 16 
Expression 5 = 5 


Expression Delimiter 1 
Expression Delimiter 2 
Expression Delimiter 3 
Expression Delimiter 4 
Expression Delimiter 5 
Expression Delimiter 6 
Expression Delimiter 7 


C 

# 

) 

9 

( 

) 

blank 


PART 5: PRINT CONTROL STATEMENT LISTING RESTRICTIONS 


TITLE, SPACE and EJECT statements will not appear in the source listings unless the statement is continued 
onto another card. Then the first card of the statement will be listed. If any of these three statements are 
generated by macro expansion, they will not be listed (regardless of continuation) if the current PRINT option 
is NOGEN. 
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APPENDIX I: SAMPLE PROGRAM AND ASSEMBLER LISTING DESCRIPTION 


The assembler listing consists of five 
sections, ordered as follows: external 
symbol dictionary items; the source and 
object program statements; relocation 
dictionary items; symbol cross-reference 


table; and diagnostic messages. 

The following sample program illustrates 
an actual assembler listing. Several 
errors have been included to show their 
affect on an assembly. 


Given: 

1. A TABLE with 15 entries, each 16 bytes long, having the following format: 


r- T - T -1- 1 

| NUMBER of items | SWITCHes | ADDRESS | NAME | 

l-X-X-X-J 

3 bytes 1 byte 4 bytes 8 bytes 

2. A LIST of items, each 16 bytes long, having the following format: 

r- t-t -r-T 

| NAME I SWITCHes | NUMBER of items | ADDRESS J 

l-X-X-X-J 

8 bytes 1 byte 3 bytes 4 bytes 


Find: Any of the items in the LIST which occur in the TABLE and put the SWITCHes, 

NUMBER of items, and ADDRESS from that LIST entry into the corresponding TABLE 
entry. If the LIST item does not occur in the TABLE, turn on the first bit in 
the SWITCHes byte of the LIST entry. 

The TABLE entries have been sorted by their NAME. 


• Appendix I 


131 








Form C24-3414-2,-3, -4 
Page Revised 4/26/67 
By TNL N26-0536 


© 

Q Q © 

© 

© 

EXTERNAL SYMBDL DICTIONARY 

SYMBOL 

TYPE 

ID ADOR 

LENGTH LD 10 



PC 

01 000000 

0001D8 


SEARCH 

LO 

00003E 

01 



EXTERNAL SYMBOL DICTIONARY (ESP) 


This section of the listing contains the 
external symbol dictionary information 
passed to the linkage-editor in the object 
module. The entries describe the control 
sections, external references, and entry 
points in the assembled program. There are 
five types of entries, shown along with 
with their associated fields. The circled 
numbers refer to the corresponding head¬ 
ing in the sample listing. 


i © T © T ©T ©‘ { © T ’© | 

’SYMBOL | TYPE 1 ID | M5DR | LENGTH | LDID| 


h-+-+— 

X | SD | X 

^ X | LD { - 

|-- + - + - 

X | ER | X 


+-+- 

X 

- + 


—+--I 

X 

—+- 1 




-H 


PC 


CM 


X 


X 


-X-X-X-X-X- 

The X indicates entries accompanying 
each type designation. 

_j 


(s^)This column contains symbols that 
appear in the name field of CSECT or 
START statements, as operands of ENTRY 
and EXTRN statements, or in the operand 
field of V-type address constants. 

(j^This column contains the type designator 
for the entry, as shown in the table. 
The type designators are defined as: 

SD — names section definition. The 
symbol appeared in the name 
field of a CSECT or START state¬ 
ment. 

LD — The symbol appeared as the oper¬ 
and of an ENTRY statement. 

ER — external reference. The symbol 
appeared as the operand of an 
EXTRN statement, or was defined 
as a V-type address constant. 

PC — unnamed control section defini¬ 
tion. 

CM — common control section defini¬ 
tion. 

(^This column contains the external symbol 
dictionary identification number (ID). 
The number is a unique two digit hexa¬ 
decimal number identifying the entry. 
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0 

® 




® 

EXAM 

SAMPLE 

PROGRAM 



PAGE 1 

© 

© 

© 

© 


© © 

© 

LOC 

OBJECT CODE 

ADDRI ADDR2 

STMT 

SOURCE STATEMENT DOS CL2-1 

03/23/67 




2 

*********************************************************************** 

SAMPL001 




3 

* 

THIS IS THE MACRO DEFINITION * 

SAMPL002 




4 

*********************************************************************** 

SAMPL003 




5 


MACRO 

SAMPL004 




6 


MOVE CTO,GFROM 

SAMPL005 




7 

. * 


SAMPL006 




8 

. * 

DEFINE SETC SYMBOL 

SAMPL007 




9 



SANPL008 




10 


LCLC CTYPE 

SAMPL009 




11 

.* 


SAMPLOIO 




12 

.* 

CHECK NUMBER OF OPERANDS 

SAMPL011 




13 

.* 


SAMPLO12 




14 


AIF IN* CSYSL1ST NE 2).ERRORl 

SAMPL013 




15 



SAMPL014 




16 

.* 

CHECK TYPE ATTRIBUTES OF OPERANDS 

SAMPL015 




17 

• * 


SAMPLO16 




18 


AIF ( T* CTO NE T•GFRQM).ERR0R2 

SAMPLO17 




19 


AIF (T'CTO E0 *C* OR T'CTO EQ 'G* OR T'CTO EQ*K'>.TYPECGK 

SAMPLO18 




20 


AIF (T'CTO E0 *D' OR T'CTO EO 'E* OR T'CTO EQ'H*1.TYPEDEH 

SAMPL019 




21 


AIF (T'CTO EQ 'F'l.MOVE 

SAMPL020 




22 


AGO .ERROR3 

SAMPL021 




23 

.TVPEDEH ANOP 

SAMPL022 




24 

.* 


SAMPL023 




25 

.* 

ASSIGN TYPE ATTRIBUTE TO SETC SYMBOL 

SAMPL024 




26 

• * 


SAMPL025 




27 

CTYPE 

SETC T'CTO 

SAMPL026 




28 

.MOVE 

ANOP 

SAMPL027 




29 

* 

NEXT TWO STATEMENTS GENERATED FOR MOVE MACRO 

SAfIPL028 




30 


L CTYPE 2,CF ROM 

SAMPL029 




31 


STCTYPE 2,CTO 

SAMPL030 




32 


MEXIT 

SAMPL031 




33 



SAMPL032 




34 

• * 

CHECK LENGTH ATTRIBUTES OF OPERANOS 

SAMPL033 




35 

• * 


SAMPL034 




36 

TYPECGK 

AIF C L* CTO NE L'SFROH OR L'CTO GT 256I.ERR0R4 

SAMPL035 


*** ERROR 

*** 








37 

* 

NEXT STATEMENT GENERATED FOR MOVE MACRO 

SAMPL036 




38 


MVC CTO,CFROM 

SAMPL037 




39 


MEXIT 

SAMPL038 




40 

. * 


SAMPL039 




41 

• * 

ERROR MESSAGES FOR INVALID MOVE MACRO INSTRUCTIONS 

SAMPL040 




42 

• * 


SAMPL041 




43 

•ERRORl 

MNOTE 1,'IMPROPER NUMBER OF OPERANOS, NO STATEMENTS GENERATED' 

SAMPL042 




44 


MEXIT 

SAMPL043 




45 

.ERR0R2 

MNOTE 1,'OPERAND TYPES DIFFERENT, NO STATEMENTS GENERATED' 

SAMPL044 




46 


MEXIT 

SAMPL045 




47 

.ERR0R3 

MNOTE 1,'IMPROPER OPERAND TYPES, NO STATEMENTS GENERATED* 

SAMPL046 




48 


MEXIT 

SAMPL047 




49 

.ERR0R4 

MNOTE 1,'IMPROPER OPERAND LENGTHS, NO STATEMENTS GENERATED* 

SAMPL048 




50 


MEND 

SAHPL049 


It is used by the LD entry of the ESD 
and by the relocation dictionary to 
cross reference to the ESD. 

C^The column contains the address of the 
symbol (hexadecimal notation) for SD and 
LD type entries, and zeros for ER type 
entries. For PC and CM type entries, it 
indicates the beginning address of the 
control section. 


(s^This column contains the assembled 
length, in bytes, of the control section 
(hexadecimal notation). 


(®^)This column contains, for LD type 
entries, the identification (ID) number 
assigned to the ESD entry that identi¬ 
fies the control section in which the 
symbol was defined. 


SOURCE AND OBJECT PROGRAM 


This section of the listing documents 
the source statements and the resulting 
object program. 


O 


7 'This is the deck identification. It is 
the symbol that appears in the name 


field of the first TITLE statement. 


© 


8 /This is the information taken from 
operand field of a TITLE statement. 


the 


(a.°j This column contains the assembled 
address (hexadecimal notation) of the 
object code. 


© 


Listing page number. 


© 


This column contains the object code 
produced by the source statement. The 
entries are always left-justified. The 
notation is hexadecimal. Entries are 
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EXAM SAMPLE 

© © 

LOC OBJECT CODE 


OOOOOO 05CO 
000002 

000002 9857 C10E 
OOOOOO 

000006 45E0 C03C 
OOOOOA 9180 C03A 
OOOOOE 4710 C030 
OOOOOO 


© 

SAMPLE PROGRAM 


02 ) 

AODR1 A0DR2 


444 ERROR *** 


000012 0200 1003 5008 00003 00008 


000013 0202 1000 5009 00000 00009 


00001E 5820 500C 
000022 5020 1004 

000026 5820 500C 
00002A 5020 1004 
00002E 8756 C004 

4*4 ERROR 444 
000032 9680 5008 C 

000036 8756 C004 


00003A 0AOE 
00003C 
000080 


00003D 00 

00003E 947F C03A 0003C 

000042 9813 C1CA 001CC 

000046 4111 C05E 00060 

00004A 8830 0001 00001 

00004E 0507 5000 1008 00000 00008 

000054 4720 C062 00064 

000058 078E 


© © 

STMT SOURCE STATEMENT 


® 

RASE 2 

© ® 

DOS CL2-1 03/23/67 



52 **********4*44**4444444***4*4*4444*4*44*444***44444**4*44*44***444***4* 

SAMPL050 


53 * 

MAIN 

ROUTINE 

• 

SANPL051 


54 *******************************************4*************************** 

SAMPL052 


55 

CSECT 



SAMPLD53 


56 

ENTRY 

SEARCH 


SAMPL054 


57 BEGIN 

BALR 

R12,0 

ESTABLISH ADDRESSABILITY OF PROGRAM 

SAMPLD55 


58 

USING 

4, R12 

AND TELL THE ASSEMBLER 

SAMPL056 

OOICO 

59 

LM 

R5,R7,=A(LISTAREA,1&,LISTEND> LOAD LIST AREA RARAMS 

SAMPL057 


60 

USING 

LIST.R5 

REGISTER 5 POINTS TO THE LIST 

SAMPL058 

0003E 

61 MORE 

8 AL 

A14,SEARCH 

FIND LIST ENTRY IN TABLE 

SAMPL059 


62 

TN 

SWITCH.NONE 

CHECK TD SEE IF NAME WAS FOUND 

SAMPL060 

00032 

63 

80 

NOTTHERE 

BRANCH IF NOT 

SAMPL061 


64 

USING 

TABLE,Rl 

REGISTER 1 NOW POINTS TO TABLE ENTRY 

SAMPL062 


65 

MOVE 

TSWITCH.LSWITCH 

MOVE FUNCTIONS 

SAMPL063 


66 


1,IMPROPER OPERAND 

TYPES, NO STATEMENTS GENERATED 



67 * 

NEXT 

STATEMENT GENERATED 

FOR MOVE MACRO 

SAMPL064 

00008 

68 

MVC 

TSWITCH.LSWITCH 


SAMPL065 


69 

MOVE 

TNUNBER,LNUM 8 ER 

FROM LIST ENTRY 

SAMPL066 


70 


1,OPERAND TYPES DIFFERENT, NO STATEMENTS GENERATED 



71 4 

NEXT 

STATEMENT GENERATED 

FOR MDVE MACRO 

SAMPL067 

00009 

72 

MVC 

TNUMBER.LNUMBER 


SAMPL068 


73 

MOVE 

TADDRESS,LAOORESS 

TO TABLE ENTRY 

SAMPL069 


74*4 

NEXT 

TWO STATEMENTS GENERATED FOR MOVE MACRO 


0000 c 

75* 

L 

2.LAD0RESS 



00004 

76* 

ST 

2 »T ADDRESS 




77 4 

NEXT 

TWO STATEMENTS GENERATED FOR MOVE MACRO 

SAMPL070 

0000 c 

78 

L 

2 ,LADDRESS 


SAMPL071 

00004 

79 

ST 

2,T ADDRESS 


SAMPL072 

00006 

80 

SXLE 

R5,R 6 ,MORE 

LOOP THROUGH THE LIST 

SAMPL073 


81 

STOP 


END OF PROGRAM, USER LIBRARY MACRO 

SAMPLC74 


82 NOTTHERE 01 

LSWITCH,NONE 

TURN ON SWITCH IN LIST ENTRY 

SAMPL075 

00006 

83 

BXLE 

R5,R 6 .MORE 

LOOP THROUGH THE LIST 

SAMPLO 76 


84 

E0J 


END OF PROGRAM, USER LIBRARY MACRO 

SAMPL077 


35** 360N 

-CL-453 

E0J CHANGE LEVEL 2-3 



86 * 

SVC 

14 




87 SWITCH 

OS 

X 


SAMPL078 


88 NONE 

EQU 

X* 80 * 


SAMPL079 


09 *************************************44*4*****4***4******4****44*****44 

SAMPL080 


90 * 

BINARY SEARCH ROUTINE 

• 

SAMPL081 


91 ****** 

************♦♦♦*♦♦*♦♦♦♦*♦*♦♦*♦♦♦****♦♦*♦*****4*****4***********4* 

SAMPL082 


92 SEARCH 

NI 

SWITCH,255-NONE 

TURN OFF NOT FOUND SWITCH 

SAMPL083 

001CC 

93 

LM 

R1,R3.=F*128,4,128 

• LOAD TABLE PARAMETERS 

SANPL084 

00060 

94 

LA 

R1,TABLAREA-16IR1) 

GET ADDRESS OF MIDDLE ENTRY 

SAMPL085 

00001 

95 LOOP 

SRL 

R3.I 

DIVIDE INCREMENT BY 2 

SAMPL086 

00008 

96 

CLC 

LNAME,TNAME 

COMPARE LIST ENTRY WITH TABLE ENTRY 

SAMPL087 

00064 

97 

8 H 

HIGHER 

BRANCH IF SHOULD BE HIGHER IN TABLE 

SAMPL088 


98 

BCR 

8.RI4 

EXIT IF FOUND 

SANPL089 


99 

SR 

R1.R3 

OTHERWISE IT IS LOWER IN THE TABLE 

XSAMPL090 


machine instructions or assembled con¬ 
stants. Machine instructions are print¬ 
ed in full with a blank inserted after 
every four digits (two bytes). Con¬ 
stants may be only partially printed 
(see the PRINT assembler instruction in 
Assembler Instruction Statements) . 

(* 2 )These two columns contain effective 
addresses (the result of adding together 
a base register value and displacement 
value): 

1. The column headed ADDRl contains the 
effective address for the first 
operand of an SS or an SI instruction, 

2. The column headed ADDR2 contains the 
effective address of the second 
operand of any instruction referenc¬ 
ing storage. 

Botn address fields contain six digits; 
however, if the high order digit is a zero, 
it is not printed. 


(T3) This column contains the statement num¬ 
ber. A plus sign (+) to the right of 
the number indicates that the statement 
was generated as the result of macro- 
instruction processing. 

(0) This column contains the source program 
statement. The following items apply to 
this section of the listing: 

a. Source statements are listed, 
including those brought into the 
program by the COPY assembler 
instruction, and macro-definitions 
submitted with the main program 
for assembly. Listing control 
instructions are not printed, 
except for the following case: 
PRINT is listed when PRINT ON is 
in effect: and a PRINT statement is 
encountered. 

b. Macro-definitions for system 
macro-instructions are not listed. 
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© 

© 





© 

C y AM 

nAIPLE PROGRAM 





PAGE 3 

© 

Q © 

© © 



© © 

■_ oc 

OBJECT CODE A3DR1 ADDR2 

STMT SO'JRCE 

STATEMENT 


DOS CL2-1 03/23/67 
© 

SO SUBTRACT INCREMENT SAMPL091 

0003* A 

i a n 





0 23 ? 5C 

A62C C046 C004A 

103 MORE 

BCT 

R2,LOOP 


LOOP 4 TIMES SAMPL092 


t** ERROR *** 






0 D0C6O 

4 7P0 C36° 0 3 3 6 4 

101 

B 

NOTFOUND 


ARGUMENT IS NOT IN THE TABLE SAMPL093 

0"9064 

1413 

107 HI'.HER 

AR 

Rl. R3 


ADD INCREMENT SAMPL094 

00 3066 

4 6 20 C0 4 a 00 34A 

103 

BCT 

R2,LOOP 


LOOP 4 TIMES SAMPL095 

0 0 30 6A 

9690 CO 3 A 03330 

104 NDTFDUND 

01 

SWI TCH,NONE 


TURN ON NOT FOUND SWITCH SAMPL096 

333065 

C7FE 

105 

BR 

R 1 4 


EXIT SAMPL097 



107 * 




SAMPL099 



109 * 

THIS IS THE T4BLE 


SAMPL100 



109 * 




SAMPL101 

3 3 0 3 7 0 


l 10 

DS 

00 


SAMPL102 

0 00 3 7 3 

3030033000000000 

111 TABLAREA 

DC 

XL8 *0* 


SAMPL103 

•030373 

C13307C9C1494043 

112 

DC 

CLB' ALPHA' 


SAMPL104 

030330 

0933393330333039 

113 

OC 

XL3 * 0* 


SAMPL105 

300036 

C2C5E3C143434343 

114 

DC 

CL8'BETA' 


SAMPL106 

? 0 3 0 3 0 

G33232303333333C 

115 

DC 

XL8'O' 


SAMPL107 

D ** ">? ? 8 

C4:503E’C1404049 

116 

DC 

CLB•DEL T A' 


SAMPL108 

■'O30to 

3009333330003009 

117 

DC 

XL 3' O' 


SAMPL109 

3 333 A Q 

9537E2C9D606D549 

118 

DC 

CLB * EPS I LON* 


SAMPL110 

voeo 

3300933090000030 

119 

DC 

XL3'0* 


SAMPL111 

9D09RR 

C5E3C1434"404''49 

120 

DC 

CL3'ETA' 


SAMPLl12 

3 3rc ^ 

0333303330030000 

121 

DC 

XL 3 1 0 * 


SAMPL113 

3 "09C 6 

37C10494C1404949 

122 

DC 

CL 3'GAMMA' 


SAMPLl14 

3 3 "000 

3033300030000099 

123 

DC 

XL 3'0' 


SAMPLl15 

03^03° 

C996C7C 1 4943494 r ' 

124 

DC 

CL3'IOTA' 


SAMPLl16 

OOOO^O 

3333330933330030 

125 

OC 

XL3'O' 


SAMPLl17 

D 0 *" 2 r 9 

32C107O7C1404349 

126 

OC 

CL3*KAPPA' 


SAMPLll8 

"‘COC c 0 

3330903333309999 

127 

oc 

XL 3'0• 


SAMPLl19 

9 

D3319432C4". 14343 

128 

DC 

CLB•LAMBDA' 


SAMPL120 

700 39 

3000303339009039 

129 

DC 

XL3 * O' 


SAMPL121 

o^ioa 

34E440434 34043 49 

139 

DC 

CL 3 * MU' 


SAMPL122 

00"U 3 

3900000933309033 

131 

DC 

XL 3 ' O' 


SAMPL123 

3.3311 ° 

3 C E440404C40404C 

132 

oc 

CL 8'NO' 


SAMPL124 

D'if'l 7 0 

0=00900033330003 

133 

DC 

XLS•O' 


SAMPL125 

0"O123 

9 6 947;QC39906354" 

134 

DC 

CL8•OMICRON' 


SAMPL126 

330130 

=043404340494040 

135 

DC 

CL 3'O' 


SAMPL127 

D D rt 1 3 o 

D7C3C94040404349 

136 

DC 

CL3 * PHI * 


SAMPL128 

033140 

3030003390300000 

137 

0C 

XL 8* O' 


SAMPL129 

r> r> n i a g 

E2C9C794rt 404349 

133 

DC 

CL 8 • SIGMA' 


SAMPL130 

M D1 5 0 

3P3C3C3033390330 

139 

DC 

XL8 * O' 


SAMPL131 

333156 

E9C5E3C140404040 

140 

DC 

CL8'ZETA' 


SAMPL132 



141 * 




SAMPL133 



142 * 

THIS IS THE LIST 


SAMPLl34 



143 * 




SAMPL135 

000 60 

D3C1D4C2C4C14040 

144 LISTAREA 

DC 

CLB'LAMBDA* 


SAMPL136 

000169 

3 A 

145 

DC 

X' 0 A • 


SAMPL137 

000169 

003910 

146 

DC 

FL3* 29* 


SAMPL138 

00016C 

00330933 

147 

DC 

At BEGIN) 


SAMPL139 

C 

. The statements 

generated 

as 

the 


format is: severity code, message 


result of a macro 

-instruction 

fol- 


text. 


low tne macro-instruction 

in 

the 




listing. 




g- 

The MNOTE * form of the MNOTE 
statement results in an in-line 

d 

. Assembler or machine instructions 


message only. An MNOTE indicator 


in the source program that 

contain 


does not appear in the diagnostic 


variable symools 

are listed 

twice: 


section of the listing. 


as they appear 

in the 

source 




input, and with values substituted 

h. 

When an error is found in a pro- 


for the variable 

symbols. 




grammer macro-definition, it is 
treated like any other assembly 

e 

. Diagnostic messages are not 

listed 


error: the error indication 


in-line in tne source and 

object 


appears after the statement in 


program section. 

An error 

indica- 


error, and a diagnostic is placed 


tor, ***ERRO R*** 

, appears 

follow- 


in the list of diagnostics. How- 


ing the statement 

in error 

. 

The 


ever, when an error is encountered 


message appears 

in the diagnostic 


during the expansion of a macro- 


section of the listing. 




instruction (system or programmer 







defined), the error indication 

f 

. MNOTE messages are listed 

in- 

line 


appears in place of the erroneous 


in the source and object 

program 


statement, which is not listed. 


section. An 

MNOTE indicator 


The error indication appears fol- 


appears in the diagnostic 

section 


lowing the last statement listed 


of the listing. 

The MNOTE 

message 


before the erroneous statement was 
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© 

© 






® 

EXAM 

SAMPLE PROGRAM 





PAGE 4 

© 

© 

© 

© 

© 


© 

© 

LOC 

OBJECT C00E ADDR1 A0DR2 

STNT SOURCE STATEMENT 

DOS CL2- 

1 03/23/67 

000170 

E9C5E3C140404040 


148 

DC 

CLS'ZETA* 


SAM^140 

0 0 01 7 R 

03 


149 

DC 

X* D5* 


SAMPL141 

000179 

000005 


150 

DC 

FL3* 5* 


SAMPLI 42 

00017C 

0O00004A 


151 

DC 

A(LOOP) 


SAMPL143 

000100 

E3C8C5E3C1404040 


15? 

DC 

CLB'THETA* 


SAMPL144 

000188 

02 


153 

DC 

X*02* 


SAMPL145 

0001 89/000020 


154 

DC 

FL3* 45’ 


SAMPL146 

00018C 

oooooooo 


155 

DC 

A!BEGIN) 


SAMPL147 

000190 

E3C1E44040404040 


156 

DC 

CL3•TAU* 


SAMPL148 

000198 

00 


157 

DC 

X*00* 


SAMPL149 

000199 

oooooo 


158 

DC 

FL3* 0* 


SAMPL150 

0001 9C 

00000001 


159 

DC 

aid 


SAMPLl51 

0001 A0 

D3C9E2E340404040 


160 

DC 

CL3*LIST* 


SAMPL152 

0001 AB 



161 

DC 

X* 1G* 


SAMPLl53 


*** ERROR *** 







0001 A 8 

0001C 8 


162 

DC 

FL3* 456* 


SAMPLl54 

0001AB 

00 







0001 AC 

00000000 


163 

DC 

A (0 1 


SAMPLl55 

000180 

Cl03D7C8C1404040 


164 LISTEND 

DC 

CL8*ALPHA* 


SAMPLl56 

0001 B8 

00 


165 

DC 

X*00* 


SAMPLl57 

0001 B9 

000001 


166 

DC 

FL 3 * 1* 


SAMPLl58 

oooiac 

00000078 


157 

DC 

Al1231 


SAMPL159 




168 * 




SAMPLl60 




169 * 

THESE 

ARE THE SYMBOLIC REGISTERS 


SAMPLl61 




170 * 




SAMPL162 

000001 



171 Rl 

EQU 

1 


SAMPL163 

000002 



172 R2 

EQU 

2 


SAMPL164 

000003 



173 R3 

EQU 

3 


SAMPL165 

000003 



174 R5 

EQU 

5 


SAMPL166 

000006 



1 7 5 R5 

EQU 

6 


SAMPL167 

000007 



176 R7 

EQU 

7 


SAMPLl68 

OOOOOC 



177 R12 

EQU 

12 


SAMPL169 

OOOOOE 



178 R14 

EQU 

14 


SAMPLl70 




179 * 




SAMPL171 




190 * 

THIS 

IS THE F3RMAT DEFINITION OF LIST ENTRIES 


SAMPLl72 




181 * 




SAMPL173 

000000 



182 LIST 

DSECT 



SAMPLl74 

000000 



183 LNAME 

DS 

CL8 


SAMPLl75 

000008 



184 LSWITCH 

DS 

C 


SAMPLl76 

000009 



185 LNUMBER 

DS 

FL3 


SAMPLl77 

OOOOOC 



186 LADDRESS 

DS 

F 


SAMPLl78 




187 * 




SAMPLl79 




188 * 

THI S 

IS FORMAT DEFINITION OF TABLE ENTRIES 


SAMPLl80 




189 * 




SAMPLl8l 

oooooo 



190 TA8LE 

DSECT 



SAMPLl82 

oooooo 



191 TNUHBER 

DS 

EL 3 


SAMPL183 

000003 



19? TSWITCH 

DS 

C 


SAMPLl84 

000004 



193 TADDRESS 

DS 

F 


SAMPL185 

000008 



194 TNAME 

DS 

CL8 


SAMPLl86 

oooooo 



195 

END 

BEGIN 


SAMPLl87 

oooico 

0000016000000010 


196 


= AIL I STAREA,16,LISTEND) 



OOOICC 

0000008000000004 


197 


*F*128,4,128* 




encountered, and the associated 
diagnostic message is placed in 
the list of diagnostics. 

i. Literals will appear in the listing 
following an LTORG or the END 
statement or both. Literals are 
identified by the equals (=) sign 
preceding them. 

j. If the END statement contains an 
operand, the transfer address 
appears in the location column 
(LOC). 


m. For LTORG and ORG statements, the 
location field contains the loca¬ 
tion assigned to the literal pool 
or the value of the ORG operand. 

n. For an EQU statement the location 
field contains the value assigned. 

o. Generated statements always print 
in normal statement format. Be¬ 
cause of this, it is possible for 
a generated statement to occupy 
two or more continuation lines on 
the listing. This is unlike 
source statements which are re¬ 
stricted to one continuation line. 


k. In the case of COM, CSECT, and 
DSECT statements, the location 
field contains the beginning 
address of these control sections 
i.e., the first occurrence. 


1 . 


the loca- 
value of 


(**) This field indicates the assembler level 
and version number, e.g., DOS CL2-1 
reads as DOS assembler level 2, version 

1 . 

(^*) Current date obtained from SET card. 



Identification-sequence field 
source statement. 
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For a USING statement 
tion field contains the 
the first operand. 


from the 
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RELOCATION DICTIONARY PAGE 1 


© 

© 

® 

@ 

POS.JD 

REL.ID 

FLAGS 

ADDRESS 

01 

01 

oc 

00016C 

01 

01 

oc 

00017C 

01 

01 

oc 

00018C 

01 

01 

oc 

OOOICO 

01 

01 

oc 

0001C8 


RELOCATION DICTIONARY 


This section of the listing contains the 
relocation dictionary information passed to 
the linkage editor in the object module. 
The entries describe the address constants 
in the assembled program that are affected 
by relocation. 

(*s) This column contains the external symbol 
dictionary ID number assigned to the ESD 
entry that describes the control section 
in which the address constant is used as 
an operand. 

(*®) This column contains the external symbol 
dictionary ID number assigned to the ESD 
entry that describes the control section 
in which the referenced symbol is 
defined. 

( 23 ) The two-digit hexadecimal number in this 
column is interpreted as follows: 


First Digit — a zero indicates that the 
entry describes an A-type, 
a Y-type, or a CCW address 
constant. 

— a one indicates that the 
entry describes a V-type 
address constant. 

Second Digit — the first three bits of 
this digit indicate the 
length and sign of the 
address constant as fol¬ 
lows : 


Bits 

0 

and 1 

Bit 2 

00 = 

1 

byte 

0 = + 

01 = 

2 

bytes 

1 = - 

10 = 

3 

bytes 


11 = 

4 

bytes 



( 2 *) This column contains the assembled 
address of the field where the address 
constant is stored. 
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cross-reference p *ge 


© 

@ 

© 

@ 


© 



SYMBOL 

LEN 

VALUE 

DEFN 





BEGIN 

00002 

000000 

005 7 

0147 

0155 

0195 


HIGHER 

00002 

000064 

0102 

0097 




LADDRESS 

00004 

000000 

0186 

0075 

00 78 



LIST 

00001 

000000 

0182 

0060 




LISTAREA 

00008 

000160 

0144 

0059 

0196 



LISTEND 

00008 

0001BO 

0164 

0059 

0196 



LNAME 

00008 

000030 

0183 

0096 




LNOMBER 

00003 

000009 

0185 

0072 




LOOP 

00004 

00004A 

0095 

0100 

0103 

0151 


LSWITCH 

00001 

000008 

0184 

0968 

9082 



MORE 

00004 

000006 

0061 

0080 

0083 



MORE 

00004 

000006 

0100 





NONF 

000"! 

000080 

0088 

0062 

0082 

0092 

0104 

NOTFOUNO 

00004 

00006A 

0104 

0101 




NOTTHERE 

00004 

000032 

0082 

0063 




R 1 

00001 

000001 

0171 

0064 

0093 

0094 

0094 0099 0102 

R12 

00001 

oooooc 

0177 

0057 

0058 



R14 

00001 

OOOOOE 

0178 

0061 

0098 

0105 


R2 

00001 

000002 

0172 

0100 

0103 



R3 

00001 

000003 

0173 

0093 

0095 

0099 

0102 

R5 

00001 

000005 

0174 

0059 

00 60 

0080 

0083 

R6 

00001 

000006 

0175 

0080 

0083 



R 7 

00001 

000007 

0176 

0059 




SEARCH 

00004 

00003E 

0092 

0056 

0061 



SWITCH 

00001 

00003C 

0087 

0062 

009? 

0104 


TABLAREA 

00008 

000070 

0111 

0094 




TABLE 

00001 

oooooo 

0190 

0064 




TAODRESS 

00004 

000004 

0193 

0076 

0079 



TNAME 

00008 

000008 

0194 

0096 




TNUMBER 

00003 

oooooo 

0191 

0072 




TSWITCH 

00001 

000003 

0192 

0068 





CROSS-REFERENCE 


ber of the statement in which the symbol 
was defined. 


This section of the listing information 
concerns symbols — where they are defined 
and used in the program. 



This column contains the statement num¬ 
bers of statements in which the symbol 
appears as an operand. 


22 J This column 


contains the symbols. 


d 22 ) This column states the length (decimal 
notation), in bytes, of the field occu¬ 
pied by the symbol value. 



This column contains either the 
the symbol represents, or a 
which the symbol is equated. 


address 
value to 


, 25 J Tnis column contains the statement num- 


The following notes apply to the cross- 
referencing section: 

• Symbols appearing in V-type address 
constants do not appear in the cross- 
reference listing. 

• A PRINT OFF listing control instruction 
does not affect the production of the 
cross-reference section of the listing. 

• Undefined symbols appear in the cross- 
reference section. However, only the 
symbol column and the reference column 
have entries. 
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EXAM DIAGNOSTICS PAGE 1 



STMT ERROR CODE MESSAGE 


36 IJ DC 73 ILLEGAL NAME FIELO 

65 IJ005P UNDEFINED SEQUENCE SYMBOL 

66 IJ303 7 MNOTE STATEMENT 

70 I J33 7 MNOTE STATEMENT 

31 IJCOPB UNDEFINED OPERATION CODE 

100 IJ 30 23 PREVIOUSLY DEFINED NAME 

16! IJ303Q INVALID DELIMITER 


’ STATEMENTS FLAGGED IN THIS ASSEMBLY 


DIAGNOSTICS 


This section contains the diagnostic 
messages issued as a result of error 
conditions encountered in the program. 
Explanatory notes for each message are 
contained in Appendix K. 

This column contains the number of the 
statement in error. 

This column contains the message iden¬ 
tifier. 

This column contains the message. 

The following notes apply to the diag¬ 
nostics section: 

• An MNOTE indicator of the form MNOTE 
STATEMENT appears in the diagnostic 
section, if an MNOTE statement is 
issued by a macro-instruction. The 
MNOTE statement itself is in-line in 
the source and object program section 
of the listing. 

• A message identifier consists of six 
characters and is of the form: 


IJQxxx 

IJQ 

identifies the issuing agent as DOS/ 

TOS assembler 

XXX 

is a unique number assigned to the 
message. 

• Two statistical messages may appear in 
the listing. They are: 

1. A message indicating the total number 
of statements in error. If no state¬ 
ments are in error, the message 

NO STATEMENTS FLAGGED IN THIS ASSEMBLY 

is printed following the Cross-Reference 
section and no diagnostic section is 
printed. 

2. A message if one or more Y-type address 
constants appear in the program. 

AT LEAST ONE RELOCATABLE Y-TYPE 
CONSTANT IN ASSEMBLY. 

This message if issued, appears before 
the diagnostic section. 
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APPENDIX J: ASSEMBLER LANGUAGES—FEATURES COMPARISON CHART 



1 Char, only! 1 Char, only 


Features not shown below are common to all assemblers. In the chart: 

Dash = Not allowed. 

X = As defined in Operating System/360 Assembler Language Manual. 


Basic 

Model 20 Programming 

Basic Support/360: 

Assembler Basic 

Assembler 


No. of Continuation Cands/Statement 
(exclusive of macro-instructions) 


I nput Character Code 


ELEMENTS: 


Maximum Characters per symbol 


Character self-defining terms 


Binary self-defining terms 


Length attribute reference 


Literals 


Extended mnemonics 


Maximum Location Counter value 


Multiple Control Sections per assembly 


EXPRESSIONS: 


Operators 


Number of terms 


Levels of parentheses 


Complex relocatabiiity 


ASSEMBLER INSTRUCTIONS: 


DC and DS 


Expressions allowed as modifiers 


Multiple operands 


Multiple constants in an operand 


Bit length specifications 


Scale modifier 


Exponent Modifier 


DC types 


DC duplication factor 


7090/7094 

Support 00S ' TOS OS/360 

Package Assemblers Assembler 

Assembler Assemblers 




8 

8 

X 

X 

X 

X 

X 

X 

X 

X 

X 

X 

2 24 -l 

2 24 -l 

X 

X 


Except Y 


Except A 


Except S 
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DC duplication factor of zero 


DC length modifier 


DS types 


DS length modifier 


DS maximum length modifier 


Basic 

Model 20 Programming 

Basic Support/360: 

Assembler Basic 

Assembler 


Except Y 


7090/7094 

Support T°P e » [)o$ TOS OS/360 

p P r BOS 8K Disk Ob sernb |er 

Package Assemblers ««emDier 

Assembler Assemblers 
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Macro Facility Features 

BPS 8K Tape, 
BOS 8K Disk 
Assemblers 

DOS, TOS 
Assemblers 

OS/360 

Assembler 

Operand Sublists 


X 

X 

Attributes of macro-instruction operands inside macro definitions and symbols used in 
conditional assembly instructions outside macro definitions. 


X 

X 

Subscripted SET symbols 


X 

X 

Maximum number of operands 

49 

100 

200 

Conditional assembly instructions outside macro definitions 


X 

X 

Maximum number of SET symbols 




global SETA 

16 

* 

★ 

global SETB 

128 

* 

* 

global SETC 

16 

* 

* 

local SETA 

16 

* 

* 

local SETB 

128 

* 

* 

local SETC 

0 

* 

* 

*The number of SET symbols permitted by the Disk and Tape Operating Systems Assemblers and the Operating 
System Assembler is variable, dependent upon the available main storage. 


Note: The maximum size of a character expression is 127 in DOS and TOS and 255 characters in OS. 
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APPENDIX K: ASSEMBLING A PROGRAM 


Figure 1 lists the control cards necessary to assemble a program. The card groups are 
listed in the order in which they must appear. All job control cards enter the system 
via SYSRDR, all others via SYSIPT. The same device may be assigned for both SYSRDR and 
SYSIPT. If this device is a disk file, the combined file must be designated as SYSIN. 

Job Control statements are described in the publications: IBM System/360 Disk Operating 
System, System Control and System Service Programs or IBM System/360 Tape Operating System, 
System Control and System Service Programs. The form numbers are listed in the preface. 


j Card Group 
Job Control 


Assembler 

Input 


jjob control 

i_ 


jCard Arrangement 

+ - 

// JOB .... 


// ASSGN SYSSLB,. 

// ASSGN SYSIPT,. 

// ASSGN SYSLST,. 

// ASSGN SYS001,. 
// ASSGN SYS002, . 
// ASSGN SYS003, . , 

// ASSGN SYSPCfl,. 

// ASSGN SYSLNK , . 
// OPTION DECK,.. 

// EXEC ASSEMBLY 


J Comments 

First card in group, always 
required. 

Tape system only. Used when 
the 3ource statement library 
is on a separate tape. 

Source program input 

Program listing 

Work files 


Source Deck 


/* 


Required except when 

assemble-and-execute is 
specified. 

Required when assemble-and- 
execute is specified. 

Optional. Used to indicate 
desired assembler functions, 

Required. 


Source statements (machine-, 
assembler-, and macro-instruc¬ 
tions) . 

Indicates end-of-data set 


J/S 


•4 - 

lEnd of job statement 

.x_ 


NOTE 1: Only those assignments and options not already in effect are required. 

NOTE 2: Assignments for SYSIN and/or SYSOUT must be accomplished by permanent assign¬ 
ments. For details see the publications for DOS and TOS system control and system ser¬ 
vice programs (see preface). 


Figure 1. Card Input for an Assembly 
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| Symbolic Unit I 

Function and Device 

1 SYSRDR i 

1 (Required if the SYSIN op- 1 

Job control statement input device. May be the same device as SYSIPT except for combined input from IBM 2311 Disk Storage ^ 

(see SYSIN). 1 


Hon is not used) 


I” SYSIPT 
I (Required if the SYSIN 
I tion is not used) 


IBM 1442, 2520, or 2540 Cord Reod Punch, IBM 2501 Card Reader, IBM 2400-series Magnetic Tape Unit, or IBM 2311 Disk Storage! 
Drive for the disk system. 


op- 


I SYSIN 

( (Required for combined 
disk input. Optional for 

I combined card or tape 
input) 


Source program input device. May be the same device as SYSRDR except for combined input from IBM 2311 Disk Storage (see 
SYSIN). 

IBM 1442, 2520, or 2540 Card Read Punch, IBM 2501 Card Reader, IBM 2400-series Magnetic Tape Unit (7- or 9-track), or 
IBM 2311 Disk Storage Drive for the disk system. If the Data Conversion feature was used to prepare the 7-track tape, it must 
also be used to read the tape. The tape or disk records must be 80-byte unblocked records. 


j also be used to read the tape. The tope or disk records must be ou-byte unblocked records. | 


Used for a combined input file for SYSRDR and SYSIPT. 

IBM 1442, 2520, or 2540 Card Read Punch, IBM 2501 Card Reader, IBM 2400-series Magnetic Tape Unit, or IBM 2311 Disk Storagel 
Drive for the disk system. I 

SYSIN can be used in lieu of the SYSRDR and SYSIPT designation when the file is card or tape input. It must be used when the J 
file is disk input (disk system only). • 


SYSLST -f- Pmorom listina device. 

I 


, SYSLST 

I (Required if the SYSOUT 
* option is not used) 


u 


-l 

I 


Program listing device. 

IBM 1403, 1404 (continuous forms only), or 1443 Printer. IBM 2400-series Magnetic Tape Unit (9-track, or 7-track with or with¬ 
out the Data Conversion feature) or IBM 2311 Disk Storage Drive for the disk system. 

Listing on tape or disk appears as 121-character print images (a single forms-control byte followed by a 120-character line image). 


| SYSPCH 

| (Optional) 


^ SYSOUT 

I (Optional) 


I- 


Object program output device. 

IBM 1442 , 2520, or 2540 Card Read Punch. IBM 2400-series Magnetic Tape Unit (9-track, or 7-track with the Data Conversion 
feature), or IBM 2311 Disk Storage Drive for the disk system. 

Output on tape or disk is in 81-byte unblocked records. 

Not used when the Assemble-and-Execute or the NODECK option is specified. 

Used for a combined output file for SYSLST and SYSPCH to a single tape unit. 

IBM 2400-series Magnetic Tape Unit (9-track, or 7-track with the Data Conversion feature). 


H 


SYSLNK 
| (Optional) 

SYS001 
I SYS002 

I SYS003 

(Required) 


-4 


Used for temporary storage of assembler output. Required only when the Assemble-and-Execute option is specified. 

IBM 2400-series Magnetic Tape Unit (9-track, or 7-track with the Data Conversion feature) for the tape system or IBM 2311 Disk 
Storage Drive for the disk system. This extent may be on the same device that contains the DOS resident system. 

Used for temporary work area during assembly. 

IBM 2400-series Magnetic Tape Unit (9-track, or 7-track with the Data Conversion feature) for either the tape or disk systems or 
three IBM 2311 Disk Storage Drives for the disk system. These extents may be on the same device that contains the DOS resi¬ 
dent system. 

For details of work file assignment see the publication for DOS system generation (see preface). 


SYSSLB 

(Optional) 


Used for the source statement library for the tape system only. 
IBM 2400-series Magnetic Tape Unit. 


SYSRLB 

(Optional) 


Used for the relocatable library for the tape system only. 
IBM 2400-series Magnetic Tape Unit. 




_l 


NOTE: The 2311 can be used for one or more of the symbolic units SYSRDR, SYSIPT, SYSIN, SYSPCH, or SYSLST only if a supervisor has been SYSGEN'd 
that can accomodate input from disk storage or output to disk storage for these units. For details see the DOS system generation manual (see preface) 


Figure 2. 


Device Assignments 


IT 


| Input and Output Using an IBM 1442 or 2520 Card Read Punch; Whenever an IBM 1442 or 2520 Card Read Punch is assigned to SYSRDR, SYSIPT, or SYSIN and also j 
■ to SYSPCH, a number of blank cards sufficient for punching the output deck must follow the/* card which follows the assembler END statement in the source | 

| deck. This is to prevent erroneously punching the cards of a following job step. Any extra cards that are not needed are automatically bypassed. j 


♦ Figure 3. 


Operating Considerations 
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An assembler variant suiting the System/360 
configuration and the core storage avail¬ 
able can be selected by the programmer. 
Figure 3.1 shows the Job Control cards re¬ 
quired to bring a particular assembler 
variant from the Relocatable Library into 
the Core Image Library. Figure 3.2 shows 
the valid assembler variant names. The 
variant is then loaded into core with the 
Job Control cards listed in Figure 1. 


// JOB CONDENSE 
// EXEC MAI NT 
DELETC ASSE.ALL 
CONDS CL 

/& 

// JOB LINKASM 
// OPTION CATAL 
INCLUDE name* 
// EXEC LNKEDT 
/& 


> This job not needed in TOS 


* 'name' selected from those listed in Figure 3.2. 


Figure 3.1. Card Input for Selecting 
Assembler Variant 


Variants IJQT16, IJQD16TW, and IJQD16DW 
must be used if the assembler is to be run 


in less than 14K of available core. Vari¬ 
ants IJQT32 and IJQD32 may be used if avail¬ 
able core is never less than 14K. IJQT32 
and IJQD32 are generally faster because they 
have text I/O buffering and can use the 
additional core to build larger symbol 
tables. The difference in speed varies with 
both the amount of additional core and the 
number of symbols in the assembly. 

Thus, if the assembly has few symbols or 
if only a small amount of additional core 
is available to a larger variant, the larger 
and smaller variants will be nearly equal in 
speed. 


Name 

System 

Work Files^ 

Minimum Core^ 

IJQD16DW 

DOS 

Disk 

10,240 

IJQD16TW 

DOS 

Tape 

10,240 

IJQD32 

DOS 

Mixed 

14,336 

IJQT16 

TOS 

Tape 

10,240 

IJQT32 

TOS 

Tape 

14,336 

1. Mixed work files mean any combination of 2400-series 
tapes and/or 2311 disk extents for 5YS001, SYS002, and 
SYS003. In general, the assembler uses SYS001 and 
SYS002 as serial files and SYS003 as a random access 
file. 

2. Minimum core refers to the minimum number of contigu¬ 
ous bytes necessary for the particular assembler variant 
to function correctly. 

Figure 3 

2. Assembler 

Variants 
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(Optional) 


Figure 4. I/O Units Used by the Tape Assembler Program 
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Note: 

Broken lines indicate 
where the Assembler 
input would be placed 
if SYSIPT were the 
same unit as SYSRDR. 

If SYSIPT and 
SYSRDR are the same 
disk unit, they must be a 
combined file assigned 
as SYSIN. 

Optional 


Optional 


1 




Optional • 


y 

[// EXEC ASSEMBLY 


{//ASSGN SYSPCH,.. 


(// ASSGN SYS003, ..J 


//ASSGN SYS002,.. . 
{// ASSGN SYS001,... 




M / 


M / 


H / 



J 





SYSIN 


(Required if SYSRDR 
and SYSIPT are a 
combined disk file. 
Optional if SYSRDR 
and SYSIPT are a 
combined card or 
tape file.) 






SYSLNK 

(Optional) 


Vv 

• \ SYS001 

' I SYS002 
/ SYS003 


n ) . 

!SYSPCH 
(Optional)^ 


SYSOUT 

(Optional) 


Figure 4.1. I/O Units Used by the Disk Assembler Program 
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Figure 5 lists the card groups that make up the output deck produced by the assembler. 
The groups are listed in the order in which they appear in the output deck. Note: No 
output deck will be produced when NODECK appears in the OPTION card. 

Figure 6 gives the format of assembler output cards. 


Card Group 


Remarks 




Reproduced Cards 


Symbol Table (SYM) 


External Symbol Dictionary 
CESD) 

Problem Program 


Relocation Dictionary (RLD) 


END Card 


These reproduced cards result 

from REPRO or PUNCH instructions 
located before START. 

Produced when SYM appears in the 
OPTION card. 


Consists of text (TXT) and 
reproduced cards. The repro¬ 
duced cards result from REPRO 
or PUNCH instructions located 
after START. 

Produced if relocatable constants 
are present. 


Produced as the last card of the 
output deck. 

Object Deck Identification 


The 4-character assembly identification label punched into 
the name entry of the first TITLE card in the source program 
is punched into columns 73-76 of each record in the object 
deck. If there is no label, these columns are left blank. 


Object Deck Sequencing Numbering 


An assembler-generated sequence number is punched into 
columns 77-80 of each card in the object deck. 


Figure 5. Assembler Output Deck 
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The information in each card is in Extended Binary Coded Decimal Interchange Code. 


Figure 6. Format of Assembler Output Cards 


| Columns 1 Punched 


73-76 |Program identification taken 

jfrom the name field of the first 
(TITLE statement. 


77-80 |Sequence number. 


RLD Card 


11-12 


17-72 


73-76 


Multiple punch (12-2-9). 

RLD—Relocation Dictionary card. 

Number of bytes of information 
contained in the card. 

Variable information (multiple 
items). 

2 positions. Pointer to the 
relocation factor of the con¬ 
tents of the load constant. 

2 positions. Pointer to the 
relocation factor of the control 
sections in which the load con¬ 
stant occurs. 

1 position. Flag indicating 
type of constant. 

3 positions. Assembled 
address of load constant. 

Program identification taken 
from the name field of the first 
TITLE statement. 


77-80 |Sequence number. 
- x - 


END Card 


15-16 


17-22 


73-76 


77-80 


Multiple punch (12-2-9). 


Assembled origin of the label 
supplied to the Assembler in the 
END card (optional). 

ESID number of the control sec¬ 
tion to which this END card 
refers. 

Symbolic label supplied to the 
Assembler if this label was not 
defined within the assembly. 

Program identification taken 
from the name field of the first 
TITLE statement. 

Sequence number. 


Columns (Punched 
_ x _ 


ESD Card 


11-12 


15-16 


17-72 


73-76 


Multiple punch (12-2-9). Iden¬ 
tifies this as a loader card- 

ESD—External Symbol Dictionary 
card. 

Number of bytes of information 
contained in this card. 

External symbol identification 
number (ESID) of the first SD, 
PC, or ER on this card. Relates 
the SD, PC, or ER to a particu¬ 
lar control section. 

Variable information. 

8 positions. Name. 

1 position. Type code to 
indicate SD, PC, LD, or ER. 

3 positions. Assembled 
origin. 

1 position. Blank. 

3 positions. Control section 
length, if an 3D-type or a PC- 
type. If an LD-type, this field 
contains the external symbol 
identification number (ESID) of 
the SD or PC containing the 
label. 

Program identification taken 
from the name field of the first 
TITLE statement. 


77-80 JSequence number. 
-x_ 


TXT Card 


1 (Multiple punch (12-2-9). 

(Identifies this as a loader 
j card. 

I 

2-4 (TXT—Text card. 

I 

6-8 (Assembled origin (address of 
|first byte to be loaded from 
jthis card). 

I 

11-12 (Number of bytes of text to be 
jloaded. 

I 

15-16 (External symbol identification 
|number (ESID) of the control 
(section (SD) containing the 
(text. 

I 

17-72 (Up to 56 bytes of text--data or 
jinstructions to be loaded. 
_x_ 
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DIAGNOSTIC ERROR MESSAGES 


Diagnostic error messages are printed fol 
lowing the cross reference listing, in 
statement number order. The message code 


has the form IJQnnn, where nnn is the actual 
message number. Figure 7 lists the diag¬ 
nostic messages and their error codes. 


|Message 

1 code 

Message 

I 

j Meaning 

1 ^ 
|IJQ001 

DUPLICATION FACTOR ERROR 

j Duplication factor: 

1 


ja. is zero in a literal. 

I 


jb. is not a positive abso- 



j lute expression. 

i 

| 

|IJQ002 

RELOCATABLE DUPLICATION FACTOR 

1 

|Duplication factor is relo- 



j eatable. 

1 

|IJQ003 

LENGTH ERROR 

1 

|1. Out of permissible 

1 


j range. 



j2. Invalid specification. 

i 

| 

| IJQ004 

1 

RELOCATABLE LENGTH 

1 

1Length is relocatable. 

I 

1 

|IJQ005 

S-TYPE CONSTANT IN LITERAL 

I 

jS-type constant in literal. 

| 

1 

jIJQ006 

INVALID ORIGIN 

1 

|Location counter has been 



jreset to a value less than 



jthe starting address of the 

1 


jcontrol section. 

f 

J 

|IJQ007 

LOCATION COUNTER ERROR 

1 

|Location Counter has 

1 

1 


{exceeded 2 31 -1. 

1 

1 

|IJQ008 

INVALID DISPLACEMENT 

|Displacement in an explicit 

1 


{address is not within 

1 


J 0-4095. 

1 

jIJQ009 
j 

MISSING OPERAND 

1 

{Operand is missing. 

t 

|IJQ010 

1 

INCORRECT REGISTER SPECIFICATIONj1. Specification of 



| register is greater 



) than 15. 

1 


{2- Odd register is speci- 



j fied where an even 

1 


j register is required. 

i 

| 

JIJQ011 

SCALE MODIFIER ERROR 

1 

{Scale modifier is: 

1 


ja. too large. 

1 


jb. not an absolute expres- 

1 

1 


| sion. 

1 

jIJQ012 

RELOCATABLE SCALE MODIFIER 

1 

{Scale modifier is relocata- 

1 


Jble. 

| 

|IJQ013 

EXPONENT MODIFIER ERROR 

{Exponent is: 

1 


ja. out of range. 

1 


jb. not specified as an 

1 


| absolute expression. 


Figure 7. Assembler Diagnostic Error Messages (part 1 of 10) 
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| Message 
j Code 

UJQ014 


IJQ015 


IJQ016 


IJQ017 


IJQ018 


IJQ019 


IJQ020 


IJQ021 


IJQ022 


IJQ023 


Message 


RELOCATABLE EXPONENT MODIFIER 


INVALID LITERAL USAGE 


INVALID NAME 


DATA ITEM TOO LARGE 


INVALID SYMBOL 


EXTERNAL NAME ERROR 


INVALID IMMEDIATE FIELD 


SYMBOL NOT PREVIOUSLY DEFINED 


ESD TABLE OVERFLOW 


PREVIOUSLY DEFINED NAME 


Meaning 


Exponent modifier is reloca¬ 
table . 

A valid literal is used ille¬ 
gally, e.g., specifies a 
receiving field or a reg¬ 
ister. 

Name entry incorrectly speci¬ 
fied — 

a. contains more than 8 
characters. 

b. does not begin with a 
letter. 

c. has a special character 
imbedded. 

The constant is too large 
for: 

a. the data type. 

b. the explicit length. 

The symbol specification is 
invalid, e.g., longer than 8 
characters. 

1. Identical name entry 
in a CSECT and a DSECT 
statement. 

2. Identical operands in one 
or more EXTRN statements. 

Immediate field data: 

a. is greater than 255. 

b. requires more than 1 byte 
of storage. 

c. is not an acceptable type 

At least one symbol in a 
critical expression has not 
been previously defined. 

The total number of control 
sections, dummy sections, and 
unique symbols in EXTRN 
statements and V-type con¬ 
stants exceeds 255. 

The symbol in the name entry 
has appeared in the name 
entry of a previous state¬ 
ment. 
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r- t- t—-- 1 


Message 

Code 

j Message 

j.... _ ... . 

1 

|Meaning 

i 

IJQ024 

j UNDEFINED SYMBOL 

1 

1 

1- 

|A symbol being referenced has not 
Jbeen defined in the program. 

1 

IJQ025 

l 

|RELOCATABILITY ERROR 

1 

I 

1 

1 

|1. A relocatable or complex 

| relocatable expression is speci- 

| fied where an absolute expres- 

| sion is required. 

1 

IJQ026 

I 

j TOO MANY LEVELS OF 

1 PARENTHESES 

i 

1 

|Expression specifies more than 

|5 levels of parentheses. 

1 

IJQ027 

I 

|TOO MANY TERMS 

1 

| 

1 

|More than 16 terms specified in an 
|expression. 

I 

IJQ028 

|REGISTER NOT USED 

1 

1 

1 

|A register specified in a DROP 
|statement is not currently in use. 

1 

IJQ028 

1 

|CCW ERROR 

1 

1 

1 

JBits 37-39 of the Channel Command 
|Word are set to nonzero. 

IJQ030 

1 

jINVALID CNOP 

i 

I 

{Invalid range 

IJQ031 

I 

IUNKNOWN TYPE 

1 

1 

1 

|Incorrect type designation in a DC, 

|DS, or literal. 

1 

IJQ032 

1 

jOP-CODE NOT ALLOWED TO 

1 BE GENERATED 

1 

1 

1 

1 

|Operation code allowed only in 
|source statement has been obtained 
j through substitution of a value 
|for a variable symbol. 

IJQ033 

1 

jALIGNMENT ERROR 

1 

1 

1 

J 

|Referenced address is not aligned to 
|the proper boundary for this 

(instruction. 

1 

IJQ034 

1 

|INVALID OP-CODE 

1 

1 

1 

1 

(Invalid operation code: 

|a. More than eight characters. 

Jb. Operation entry not followed by 
| a blank on same card. 

IJQ035 

1 

j ADDRESSABILITY ERROR 

1 

i 

1 

|The referenced address is not within 
(the range of a USING instruction. 

IJQ036 

1 

|NO OPERAND ALLOWED 

1 

I 

1 

(Operand found for an operation 

(code which does not allow operands. 

1 

IJQ037 

1 

j MNOTE STATEMENT 

1 

1 

1 

1 

(An MNOTE statement has been generat- 
jed from a macro definition. The 
(text and severity code of the MNOTE 
(statement is in-line in the listing. 


L-X-L-l 


Figure 7. Assembler Diagnostic Error Messages (part 3 of 10) 







Message 

Code 


IJQ038 


IJQ039 

IJQ040 

IJQ041 

IJQ042 

IJQ043 

IJQ044 

IJQ045 

IJQ046 


Message 


ENTRY ERROR 


INVALID DELIMITER 


STATEMENT TOO LONG 


UNDECLARED VARIABLE 
SYMBOL 


SINGLE TERM LOGICAL 
EXPRESSION IS NOT A 
SETB SYMBOL 

SET SYMBOL PREVIOUSLY 
DEFINED 

VARIABLE SYMBOL 
SUBSCRIPT EXCEEDS 
THE DECLARED 
DIMENSION 


ILLEGAL SYMBOLIC 
PARAMETER 


AT LEAST 1 RELOCATABLE 
Y-TYPE CONSTANT IN 
ASSEMBLY 


Meaning 

1. More than 100 ENTRY operands 
in this program. 

A symbol in the ENTRY operand: 


IJQ047 j SEQUENCE SYMBOL 

PREVIOUSLY DEFINED 


2 . 


a. appears in more than one 
ENTRY statement. 

b. is undefined. 

c. is defined in a dummy sec¬ 
tion. 

d. is defined in blank common. 

e. is equated to a symbol 
defined by an EXTRN state¬ 
ment. 

Any syntax error, e.g., character 
invalid at point encountered in 
left-to-right scan, missing or 
illegal delimiter. 

Record has more than 187 characters. 


Variable symbol is not declared 
in a define SET symbol statement or 
in a macro prototype. 

Single term logical expression 
is not a SETB symbol. 


SET symbol previously defined. 


A SET symbol has been declared as: 

1. undimensioned but it is 
subscripted. 

2. subscripted but it is 
undimensioned. 

Attribute requested for a 
variable symbol which is not a sym¬ 
bolic parameter 

One or more relocatable Y-type con¬ 
stants in assembly; relocation may 
result in address greater than 2 
bytes in length. 


Sequence symbol previously 
defined. 


J 


Figure 7. Assembler Diagnostic Error Messages (part 4 of 10) 
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| Message 
| Code 

IIJQ048 


IJQ049 


IJQ050 


IJQ051 


IJQ052 


IJQ053 


IJQ054 


IJQ056 


IJQ057 


Message 

SYMBOLIC PARAMETER 
PREVIOUSLY DEFINED OR 
SYSTEM VARIABLE 
SYMBOL DECLARED AS 
SYMBOLIC PARAMETER 

VARIABLE SYMBOL MATCHES 
A PARAMETER 

INCONSISTENT GLOBAL 
DECLARATIONS 


MACRO DEFINITION 
PREVIOUSLY DEFINED 


NAME FIELD CONTAINS 
ILLEGAL SET SYMBOL 


GLOBAL DICATIONARY FULL 


LOCAL DICTIONARY FULL 


ARITHMETIC OVERFLOW 


SUBSCRIPT EXCEEDS 
MAXIMUM DIMENSION 


IJQ058 (ILLEGAL LTORG 


|IJQ059 (UNDEFINED SEQUENCE 
| I SYMBOL 


Meaning j 

-^ 

1. Symbolic parameter previously ( 

defined. | 

2. System variable symbol declared j 

as a symbolic parameter. j 


Variable symbol matches a parameter. 


A global SET variable that is 
defined in more than one macro defi¬ 
nition, or in a macro definition and 
in the source program, is inconsis¬ 
tent in SET type or dimension. 

Prototype operation entry is 
identical to a: 

a. machine instruction. 

b. assembler instruction. 

c. previous prototype. 

SET symbol in name entry does 
not correspond to SET statement 
type. 

Global dictionary is full. Assembly 
is terminated. 

Local dictionary is full. Assembly 
is terminated. 

Intermediate or final result of an 
arithmetic operation is less than 
-231 or greater than 231-1. 

1. SSYSLST or symbolic parameter 
subscript: 

a. exceeds 100. 

b. is negative. 

c. is zero. 

2. SET symbol subscript exceeds 
dimension. 

LTORG statement occurs within blank 
common (COM) or a dummy section 
(DSECT). 


Undefined sequence symbol. 


Figure 7. Assembler Diagnostic Error Messages (part 5 of 10) 
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] Message 
j code 

1IJQ060 


IJQ061 

IJQ062 


IJQ063 


IJQ064 


IJQ065 


IJQ066 


IJQ067 


IJQ068 


IJQ069 


IJQ070 


IJQ071 


IJQ072 


Message 

ILLEGAL ATTRIBUTE 
NOTATION 


ACTR COUNTER EXCEEDED 

GENERATED STRING GREATER 
THAN 127 CHARACTERS 


(Meaning 

|L # , S*, or I* requested for a 
(parameter whose type attribute does 
jnot allow these attributes to be 
j requested. 

I 

|ACTR counter exceeded. 

I 

(Generated string is greater 
(than 127 characters. 


EXPRESSION 1 OF SUBSTRING 
IS ZERO OR MINUS 

EXPRESSION 2 OF 
SUBSTRING IS ZERO OR 
MINUS 

INVALID OR ILLEGAL TERM 
IN ARITHMETIC RELATIONAL 
EXPRESSION 


UNDEFINED OR DUPLICATE 
KEYWORD OPERAND OR 
EXCESSIVE POSITIONAL 
OPERANDS 


EXPRESSION 1 OF SUBSTRING 
GREATER THAN LENGTH OF 
CHARACTER EXPRESSION 

GENERATION TIME DICTIONARY 
AREA OVERFLOWED 

EXPRESSION 2 OF SUBSTRING 
GREATER THAN 8 CHARACTERS 

FLOATING POINT CHARACTER¬ 
ISTIC OUT OF RANGE 


ILLEGAL OCCURRENCE OF 
LCL, GBL, OR ACTR 
STATEMENT 

ILLEGAL RANGE ON ISEQ 
STATEMENT 


Expression 1 of substring is 
zero or minus. 

Expression 2 of substring is 
zero or minus. 


1. The parameter is not a 
self-defining term. 

2. The value of the SETC 
symbol used in the arithmetic 
expression is not composed of 
decimal digits. 

1. A keyword operand occurs 
more than once in a macro 
instruction. 

2. Keyword is not defined in 
prototype. 

3. In a mixed-mode macro 
instruction, more positional 
operands are specified than 
are specified in the 
prototype. 

Expression 1 of substring is 

greater than length of 

character expression. 

See Appendix H. 


Expression 2 of substring is 
greater than 8 characters. 

Exponent too large for length of 
defining field, exponent modifier 
has caused loss of all significant 
digits. 

ordering error. 


Operand of ISEQ statement has 
an illegal range. 


Figure 7. Assembler Diagnostic Error Messages (part 6 of 10) 
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|Message 
j code 

I--- 

IIJQ073 

|IJQ074 

|IJQ075 

|IJQ076 
|IJQ077 

|IJQ078 

|IJQ079 
|IJQ080 

JIJQ081 
|IJQ082 

IIJQ083 

|IJQ084 

Figure 7 


Message 

ILLEGAL NAME FIELD 


ILLEGAL STATEMENT IN 
COPY CODE OR SYSTEM 
MACRO 

ILLEGAL STATEMENT 
OUTSIDE OF A MACRO 
DEFINITION 

SEQUENCE ERROR 

ILLEGAL CONTINUATION 
CARD 


MACRO MNEMONIC OP-CODE 
TABLE OVERFLOW 


ILLEGAL STATEMENT IN 
MACRO DEFINITION 

ILLEGAL START CARD 


ILLEGAL FORMAT IN GBL 
OR LCL STATEMENT 

ILLEGAL DIMENSION 
SPECIFICATION IN GBL 
OR LCL STATEMENT 

SET STATEMENT NAME 
FIELD NOT VARIABLE 
SYMBOL 

ILLEGAL OPERAND FIELD 
FORMAT 


r ~! 

|Meaning f 

|1« Statement is not allowed to j 

j have a name. j 

j2. Name entry of statement is miss-| 

I ing. I 

I I 

}Illegal statement in COPY code | 

jor system macro. j 


Illegal statement outside of a 
macro definition. 


Sequence error. 

1. Too many continuation cards- 

2. Non blanks occur between the 
begin and continue columns of 
the continuation card. 

Macro mnemonic operation code 

table has an overflow. See Appendix 

H. 

This operation is not allowed 
within a macro definition. 

Statements affecting, or depending 
upon, the location counter have been 
encountered before a START state¬ 
ment. 

An operand is not a variable symbol. 


Dimension is other than 1-255. 


The name entry of the SET 
statement is not a variable 
symbol. 

Syntax invalid, e.g., AIF 
statement operand does not start 
with a left parenthesis or, operand 
of AGO is not a sequence symbol. 


• Assembler Diagnostic Error Messages (part 7 of 10) 








Message 

code 


IJQ085 


IJQ086 


IJQQ87 


IJQ088 


IJQ089 


IJQ090 


IJQ091 


IJQ092 


IJQ093 


IJQ094 


Message 

INVALID SYNTAX IN 
EXPRESSION 


ILLEGAL OSAGE OF SYSTEM 
VARIABLE SYMBOL 


NO ENDING APOSTROPHE 


UNDEFINED OPERATION 
CODE 


INVALID ATTRIBUTE 
NOTATION 


INVALID SUBSCRIPT 


INVALID SELF-DEFINING 
TERM 


INVALID FORMAT FOR 
VARIABLE SYMBOL 


UNBALANCED PARENTHESES 
OR EXCESSIVE LEFT 
PARENTHESES 

INVALID OR ILLEGAL 
NAME OR OPERATION IN 
PROTOTYPE STATEMENT 


jMeaning 

i-- 

1. invalid delimiter. 

2. Too many terms in expression. 

3. Too many levels of parentheses. 

9. Two operators in succession. 

1. System variable symbol 
appears in: 

a. the name entry of a SET 
statement. 

b. a mixed—mode macro definition. 

c. a keyword macro definition. 

d. a GBL or LCL statement. 

2. &SY SLIST in context other than 
N* SSYSLIST. 

There is an unpaired apostrophe in the 
statement. 

Symbol in operation code field does not 
correspond to a valid machine or assem¬ 
bler operation code or to any operation 
code in a macro prototype statement. 

Syntax error, e.g., the argument of 
the attribute reference is not a symbol¬ 
ic parameter inside a macro definition. 

Syntax error, e.g., no right parenthesis 
after subscript, double subscript where 
single subscript is required, or single 
subscript where double subscript is 
required. 

1. Value is too large. 

2. Value is inconsistent with 
the data type. 

1. Variable symbol is longer 
than 8 characters. 

2. First character after the 
ampersand is not alphabetic. 

Unbalanced parentheses or 
excessive left parentheses. 


Invalid or illegal name or 
operation in prototype 
statement. 


Figure 7. Assembler Diagnostic Error Messages (part 8 of 10) 
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Message 

Code 


Message 


4 


IJQ096 


MACRO INSTRUCTION OR 
PROTOTYPE OPERAND 
EXCEEDS 127 CHARACTERS 
IN LENGTH 


j Meaning 

|Macro instruction or prototype 
|operand exceeds 127 characters 
|in length. 


IJQ097 


INVALID FORMAT IN MACROjl. 
INSTRUCTION OPERAND OR j2. 
PROTOTYPE PARAMETER | 


3. 

4. 

5. 

6 . 


Illegal equal sign (=). 

A single ampersand (6) appears 
somewhere in the standard 
value assigned to a 
prototype keyword parameter. 

First character of a prototype 
parameter is not an ampersand. 
Prototype parameter is a 
subscripted variable symbol. 
Invalid usage of alternate 
format in prototype (see example) 
Nonsense prototype parameter, 
e.g., SA* or €A66. 


Note : Occurrence of this error will 
cause only syntax to be checked for 
the remainder of the macro 
definition. 


Example: 


I 


|Continuation} 


|Name|Operation!Operand]column 

—f—- 

jfcA,SB, 

1 or | 

j 6A,&B, j X 

j &C j _ 



_\ 


IJQ098 |EXCESSIVE NUMBER OF 

jOPERANDS OR PARAMETERS 

I 

I 

I 

IJQQ99 |POSITIONAL MACRO 

(INSTRUCTION OPERAND, 

|PROTOTYPE PARAMETER, 
(OR EXTRA COMMA FOLLOWS 
(KEYWORD 

I 

IJQ100 (STATEMENT COMPLEXITY 
(EXCEEDED 


1. The prototype has more 
than 100 parameters. 

2. The macro instruction has 
more than 100 operands. 

Positional macro instruction 
operand, prototype parameter, 
or extra comma follows keyword. 


See Appendix H. 


Figure 7. Assembler Diagnostic Error Messages (part 9 of 10) 
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Message 

Code 


Message 


Meaning 


IJQ101 


IJQ102 


IJQ103 


IJQ104 


IJQ105 


IJQ107 


IJQ108 


IJQ109 


IJQ110I 


IJQ111I 


IJQ112I 


IJQ113I 


IJQ114I 


EOD ON SYSIN OR SYSIPT 


INVALID OR ILLEGAL ICTL 


ILLEGAL NAME IN OPERAND 
FIELD OF COPY CARD 


COPY CODE NOT FOUND 


EOD ON SOURCE STATEMENT 
LIBRARY 

INVALID OPERAND 


PREMATURE EOD 


PRECISION LOST 


End-of-data reached before an END 
statement was encountered. 

1. Operands of ICTL statement are 
out of range. 

2. ICTL is not the first statement 
in the input deck. 

Syntax error, e.g., symbol has an 
illegal character or has more than 
8 characters. 

The operand of a COPY statement 
specified COPY text which cannot be 
found in the library. 

End-of-data reached before a MEND 
statement was encountered. 

Unrecognizable operand in PRINT 
statement. 

Indicates a machine error or an 
internal assembler error. 

High order information lost by 
attempting to express constant in a 
field not long enough to contain it. 


NOTE: Messages IJQ110I through IJQ114I are 

printed on both SYSLST AND SYSLOG. IJQ110I 
and IJQ111I errors can be detected at any 
point during assembly—job is terminated and 
amount of assembly listing printed is unpre¬ 
dictable. IJQ112I, IJQ113I, and IJQ114I 
errors are detected immediately upon assembly 
attempt—job is terminated and no assembly 
listing is printed. 


ABORT—PERM I/O ERROR 
ON SYSxxx 

ABORT—UNEXPECTED EOF 
ON SYSxxx 


ABORT—INADEQUATE CORE 
FOR 32K ASSEMBLER 


ABORT—INVALID PHYSICAL 
UNIT FOR SYSxxx 


ABORT—NO UNIT ASSIGNED 
FOR SYSPCH 


J__ 


An unrecoverable error on the desig¬ 
nated unit prevents further processing. 

The assembler does not support multi¬ 
volume work files. Determine the 
cause of EOF (usually short tape) and 
rerun with adequate storage for work 
files. 

An attempt has been made to use the 
32K design point assembler in less 
than 14K of core. Allocate more core 
for the background program or link edit 
one of the 16K design point assemblers. 

An attempt has been made to use tape 
work file(s) on an assembler link edited 
for disk or to use disk work file(s) 
on an assembler link edited for tape. 
Only the first invalid unit detected 
will be named. Check all unit assign¬ 
ments and rerun. 

Self explanatory. Either use OPTION 
NODECK, OPTION LINK, or assign a 
unit for SYSPCH. 


Figure 7. Assembler Diagnostic Error Messages (part 10 of 10) 
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|Card Group 
I Job Contrc 


Card Arrangement 


Job Control 


Assembler Inp 


// JOB ... 

// ASSGN SYSRLB., 

// ASSGN SYSSLB.. 

// ASSGN SYSIPT.. 

// ASSGN SYSLST.. 

// ASSGN SYSLNK., 

// ASSGN SYS001.. 
// ASSGN SYS002., 
// ASSGN SYS003.. 

// OPTION LINK... 

// EXEC ASSEMBLY 


ut Source Deck 


/ i 


I 

T, 


Comments 

First card in group, always required, 


Tape system only. Used when the relo¬ 
catable library is on a separate tape 
and modules are to be included. 

Tape system only. Used when the source 
statement library is on a separate 
tape. 

Source program input 
Program listing 

Required for assemble-and-execute. 

1- Work files 


Required. Used to indicate LINK option 
and any additional assembler functions 
desired. 

Required 

-----— —t 

Source statements (machine-, assembler- 
and macro-instructions). NOTE: If th$ 
operand of the END statement is omit¬ 
ted, a PHASE card must precede the // 

EXEC ASSEMBLY card or an ENTRY card 
must follow the END statement (tape 
system only). 


Indicates end-of-data set 


■ 

H 


Job Control 


H 


ENTRY ... 

// EXEC LNKEDT 
// EXEC 


Calls the Linkage Editor 


Data 




Data, if any 
/* 


End-of-data set indicator 


Job Control 


A 


End of job statement 


NOTE 1: Only those assignments and options not already in effect are 
required. 

NOTE 2: Assignments for SYSIN and/or SYSOUT must be accomplished by 
permanent assignments. For details see the publications for DOS and 
TOS system control and system service programs (see preface). 


Figure 8. 


Card Input for Assemble-and Execute 
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j// JOB ... 

J// ASSGN SYSIPT,.. 

|// ASSGN SYSLST,... 

|// ASSGN SYS001,.. 
j// ASSGN SYS002,.. 
j// ASSGN SYS003,. . 

J// ASSGN SYSLNK, • • • 

J// OPTION LINK,... 

|// EXEC ASSEMBLY 

| Source Deck 

j/* 

I- 


Ass emble-and- execute 


ENTRY .... 


// EXEC LNKEDT 


Assemble-and-execute 
(Include object 
routines from the 
relocatable library) 


// JOB ... 

// ASSGN SYSIPT,.. 

// ASSGN SYSLST,.•. 

// ASSGN SYS001,.. 
// ASSGN SYS002,•. 
// ASSGN SYS003,•• 

// ASSGN SYSLNK,... 

// OPTION LINK,.. 

// EXEC ASSEMBLY 

Source deck 
/* 

INCLUDE SUBR1 
INCLUDE SUBR2 


ENTRY .... 


// EXEC LNKEDT 


Assemble-and-execute 
(Include object 
routines from cards) 


// JOB 


// ASSGN SYSIPT,.. 

// ASSGN SYSLST,.. 

✓/ ASSGN SYS001,.. 
// ASSGN SYS002,. . 
// ASSGN SYS003,•. 

// ASSGN SYSLNK,.. 

// OPTION LINK,.. 

// EXEC ASSEMBLY 

Source deck 
/* 


INCLUDE 

Object deck(s) 


ENTRY 


// EXEC LNKEDT 


Assemble-and-execute 
(Include object 
routines from the 
relocatable library 
and from cards) 

// JOB ... 

// ASSGN SYSIPT,... 

// ASSGN SYSLST,... 

// ASSGN SYS001,.. 

// ASSGN SYS002,.. 

// ASSGN SYS003,.. 

// ASSGN SYSLNK,.. 

// OPTION LINK,... 

// EXEC ASSEMBLY 

Source deck 
/* 

INCLUDE SUBR1 
INCLUDE 
Object deck(s) 


INCLUDE SUBR2 


INCLUDE SUBRT 


ENTRY 


// EXEC LNKEDT 


Any Job control cards needed for the programs to be executed. 


{Data, if any 

I/* 


j// EXEC |// EXEC \// EXEC |// EXEC 

|Data, if any |Data, if any |Data, if any (Data, if any 

j/* j/* j/* |/* 

|/T~ \/6 \/g f/S 

|If SYSRDR and SYSIPT are different units, a /£ card must be placed after the last 
| EXEC card in SYSRDR, and should be placed after the last /♦ in SYSIPT. 

j Note: If the operand of the END statement is omitted, a PHASE card must precede the 
'// EXEC ASSEMBLY card or an ENTRY card must follow the END statement. 

I___ 


|// EXEC | 

(Data, if any j 

|/* I 

J/S I 


Figure 9. card input for Variations of Assemble-and-execute 
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APPENDIX Li SELF-RELOCATING PROGRAM TECHNIQUES 


Self-relocating programs are executed in a 
multiprogramming environment and at any 
location in main storage- These programs 
may be located in either foreground area of 
main storage- A program that is self- 
relocating must initialize its address 
constants, including Channel Command Words 
(CCWs), at execution time- The user must 
code his own self-relocating routine for 
execution after it is linkage edited and 
loaded into main storage. 

When coding a self-relocating program, 
the programmer should take these points 
into consideration; 

1. All A-type address constants must be 
relocated. 

2. The I/O area addresses in all CCWs must 
be relocated. 

3. Address constants generated by Physical 
IOCS macros (EXCP, WAIT, etc.) must be 
relocated. 

4. Logical IOCS macros cannot be self- 
relocated. 

The following example program shows how 
a user may code a self-relocating program. 
This example uses the A-type constant and 
registers 1 and 2 although the user may use 
any of the other available registers if he 
chooses. 


This program contains six address 
constants. Two are A-type and two each are 
contained in the Command Control Block 
(CCB) and the Channel Command Word (CCW) 
macros. This procedure is used: 


1. The absolute addresses of the contents 
of the two A-type constants (EOFTAPE 
and CHA12) and the CCW for each CCB 
(PRINTCCW and TAPECCW) are loaded into 
a work register (Register 1). 

2. The work register is stored in the 
address constants [A(EOFTAPE) and 

A(CHA12)] and in their respective CCBs 
(PRINTCCB+ 8 and TAPECCB+8). 

3. The command code for the CCWs shares a 
full word with the I/O area address and 
must be reset after the I/O area 
address has been stored. This is done 
here by two methods; (a) saving the 
command code for the PRINTCCW in Reg¬ 
ister 2 and then restoring it; (b) 
using the Move Immediate (MVI) instruc¬ 
tion for the TAPECCW to set the command 
code. 

In the main routine of this program, 
note that register notation has been used 
with the EXCP and WAIT macros to avoid the 
generation of address constants by the 
macros themselves. The example of a self- 
relocating program follows; 
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SOURCE STATEMENT 



PRINT 

NOGEN 


PROGRAM 

START 

0 



BALR 

15,0 



USING 

*,15 


♦ ROUTINE TO RELOCATE ADDRESS CONSTANTS 


LA 

1,PRINTCCW 

RELOCATE CCW ADDRESS 


ST 

1,PRINTCCB*8 

IN CCB FOR PRINTER 


LA 

1,TAPECCW 

RELOCATE CCW ADDRESS 


ST 

1,TAPECCB+8 

IN CCB FOR INPUT TAPE 


LA 

1,EOFTAPE 

♦RELOCATE***** 


ST 

1,AEOFTAPE 

* PROGRAM * 


LA 

1,CHA12 

* ADDRESS * 


ST 

1,ACHA12 

♦ ♦♦♦CONSTANTS* 


IC 

2,PRINTCCW 

SAVE PRINT CCW OP CODE 


LA 

1,OUTAREA 

RELOCATE OUTPUT AREA ADDRESS 


ST 

1,PRINTCCW 

IN PRINTER CCW 


STC 

2,PRINTCCW 

RESTORE PRINT CCW OP CODE 


LA 

1,INAREA 

RELOCATE INPUT AREA ADDRESS 


ST 

1,TAPECCW 

IN TAPE CCW 


MVI 

TAPECCW,2 

SET TAPE CCW OP CODE TO READ 

* MAIN ROUTINE...READ TAPE AND PRINT 

RECORDS 

READTAPE 

LA 

1,TAPECCB 

GET CCB ADDRESS 


EXCP 

(1) 

READ ONE RECORD FROM TAPE 


WAIT 

(1) 

WAIT FOR COMPL. OF I/O 


L 

10,AEOFTAPE 

GET ADDRESS OF TAPE EOF ROUTINE 


BAL 

14,CHECK 

GO TO UNIT EXCEPTION SUBROUTINE 


MVC 

OUTAREA(10),INAREA 

EDIT RECORD 


MVC 

OUTAREA*15(70),INAREA*10 

IN 


MVC 

OUTAREA+90(20),INAREA*80 

OUTPUT AREA 


LA 

1, PRINTCCB 

GET CCB ADDRESS 


EXCP 

(1) 

PRINT EDITED RECORD 


WAIT 

(1) 

WAIT FOR COMPL. OF I/O 


L 

10, ACHA12 

GET ADDRESS OF CHAN 12 ROUTINE 


BAL 

14,CHECK 

GO TO UNIT EXCEPTION SUBROUTINE 


B 

READTAPE 


CHECK 

TM 

4(1),1 

CHECK FOR UNIT EXC. IN CCB 


BCR 

1,10 

YES-GO TO PROPER ROUTINE 


BR 

14 

NO-RETURN TO MAINLINE 

CHA12 

MVI 

PRINTCCW,X*8B* 

SET SK TO CHAN 1 OP CODE 


EXCP 

(1) 

SK TO CHAN 1 IMMEDIATELY 


WAIT 

(1) 

WAIT FOR COMPL. OF I/O 


MVI 

PRINTCCW,9 

SET PRINTER OP CODE TO WRITE 


BR 

14 

RETURN TO MAINLINE 

EOFTAPE 

EOJ 


END OF JOB 


CNOP 

0,4 

ALIGN CCB * S TO FULL WORD 

PRINTCCB 

CCB 

SYS004,PRINTCCW,X * 0400 * 


TAPECCB 

CCB 

SYS001,TAPECCW 


PRINTCCW 

CCW 

9,OUTAREA,X•2 0 *,110 


TAPECCW 

CCW 

2,INAREA,X*20*,100 


AEOFTAPE 

DC 

A(EOFTAPE) 


ACHA12 

DC 

A(CHA12) 


OUTAREA 

DC 

CL110' * 


INAREA 

DC 

CL100* ' 



END 

PROGRAM 
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INDEX 


&SYS, restrictions on use, 63, 75, 88 
&SYSECT (See Current control section name) 
&SYSLIST (see Macro-instruction operand) 
&SYSNDX (see Macro-instruction index) 
7090/7094 Support Package Assembler, 8, 135 
Absolute terms, 15 
ACTR instruction 84 
Address constants, 47 
A-type, 47 

Complex relocatable expressions, 47 
Literals not allowed, 20 
S-type, 48 
V-type, 48 
Y-type, 47 

Address specification, 34 
Addressing 24 

Dummy sections, 29 
Explicit, 24 

External control sections, 32 

Implied, 24 
Relative, 26 
AGO instruction 83 
Example, 83 
Form of, 83 

Inside macro-definitions, 83 
Operand field of, 83 
Outside macro-definitions, 83 
Sequence symbol in, 83 
Use of, 83 
AIF instruction 82 
Example of, 82 
Form of, 82 

Inside macro-definitions, 82 
Invalid operand fields of, 83 
Logical expression in, 82 
Operand field of, 82 
Outside macro-definitions, 82 

Sequence symbols in, 82 
Use of, 82 

Valid operand fields of, 83 
Alignment, boundary 

CNOP instruction for, 55 
Machine instruction, 33 
Ampersands in 

Character expressions, 79 
Macro-instruction operands, 66 
MNOTE instruction, 87 
Symbolic parameters, 63 
Variable symbols, 59 

ANOP instruction 84 
Example of, 84 
Form of, 84 
Sequence symbol in, 84 
Use of, 84 
Apostrophes in 

Character expressions, 78 
Macro-instruction operands, 66 
MNOTE instruction, 87 
Arithmetic expressions 

Arithmetic relations, 81 
Evaluation procedure, 76 
Invalid examples of, 76 


Operand sublists, 77 
Operators allowed, 75 
Parenthesized terms in 76 
evaluation of, 76 
examples of, 76 
SETA instruction, 75 

SETB instruction, 80 

Sxibstring notation, 78 

Terms allowed, 75 
Valid examples of, 75 

Arithmetic relations, 81 

Arithmetic variable, 91 
Assembler instructions 
Statement, 38 
Table, 117 
Assembler language 8 

Basic Programming Support, 8, 135 
Comparison chart, 135 
Macro facilities, relation to, 58 
Statement foonnat, 13 
Structure, 15, 16 
Assembler program 

Basic functions, 9 
Output, 2 7 

Assembling a Program 138 

Assemble-and-execute 155, 156 
Card Input 138, 155, 156 
Device Assignments 139 
Diagnostic Error Messages 145 

I/O Units Used (16K Tape) 141 

Operating Considerations 140 
Output 142, 143 
Assembly, terminating an, 57 
Assembly no operation (see ANOP 
instruction) 

Attributes 71 

How referred to, 72 

Inner macro-instruction operands, 71 

Kinds of, 71 

Notations, 71 

Operand sublists, 71 

Outer macro-instruction operands, 71 

Summary chart of, 124 

Use of, 71 

(see also specific attributes) 


Basic Programming Support Assembler, 8, 135 
Base registers 

Address calculation, 9, 32, 34 
DROP instructions, 24 
Loading of, 24 
USING instructions, 24 
Binary constant, 44 
Binary self-defining term, 18 
Binary variable, 91 
Blanks 

Logical expressions, 80 
Macro-instruction operands, 67 


CCW instruction, 50 
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Channel command word, defining, 50 
Character codes, 98 
Character constant, 42 
Character expressions, 78 
Ampersands in, 78 
Character relations, 81 
Examples of, 78 

Periods and, 78 

Apostrophes in, 78 
SETB instructions, 80 

SETC instructions, 77 

Character relations, 81 

Character self-defining term, 19 
Character set, 15, 98 
Character variable, 91 
CNOP instruction, 55 
Coding form, 12 
COM instruction, 30 

Commas, macro-instruction operands, 67 
Comments statements 

Examples of, 14, 65 
Model statements, 65 
Not generated, 65 

Comparison chart, 135 

Compatibility 

Assembler language, 7 
Macro-definitions, 97 
Complex relocatable expressions, 47 
Concatenation 

Character expressions, 78, 79 
Defined, 64 
Examples of, 64 
Slabstring notations, 78 
Conditional assembly elements, summary 
charts of, 85, 123 
Conditional assembly instructions 
How to write, 70 
Summary of, 85 
Use of, 70 

(see also specific instructions) 
Conditional branch (see AIF instruction) 
Constants (see also specific types) 
Defining (see DC instructions) 

Summary of, 120 
Continuation lines, 11 

Control dictionary, 27 

Conditional branch instruction, 36 
Operand format, 37 

Control section location assignment, 28 
Control sections 

Blank common, 30 

CSECT instruction, 28 
Defined, 27 

First control section, properties of 
28 

START instruction, 28 
Unnamed, 29 
COPY instruction, 56 
COPY statements in macro-definitions 
Form of, 65 

Model statements, contrasted, 65 
Operand field of, 65 
Use of, 65 
Count attribute 
Defined, 73 
Notation, 71 
Operand sublists, 73 
Use of, 73 


Variable symbols, 73 
CSECT instruction, symbol in, length 
attribute of, 28 

Current control section name (&SYSECT) 
Affected by CSECT, DSECT, START, 93 
Example of, 93 
Use of, 93 


Data definition instructions, 39 
Channel command words, 50 
Constants, 39 
Storages, 48 
DC instruction, 39 

Duplication factor operand subfield, 40 
Operand subfield Modifiers, 40 
Type operand subfield, 40 
Length modifier, 40 
Scale modifier, 41 
Exponent modifier, 42 
Constant operand subfield, 42 
Address-constants )see Address 
constants) 

Binary constant, 44 
Character constant, 42 
Decimal-constants, 46 
Fixed-point constants, 44 
Floating-point constants, 45 
Hexadecimal constant, 43 
Type codes for, 41 

Decimal constants, 46 

Length modifier, 46 

Length, maximum, 4 6 

Packed, 45 
Zoned, 45 

Decimal field, integer attribute of, 74 
Decimal self-defining terms, 78 
Defining constants (see DC instruction) 
Definina storaqe (see DC instruction, 

DS instruction) 

Defining symbols, 17, 70 
Diagnostic Error Messages 145 
Dimension, subscripted SET symbols, 91 
Displacements, 34 
Double-shift instruction, 33 
DROP instruction, 25, 33 
DS instruction, 48 
Defining areas, 49 
Forcing alignment, 49 
DSECT instruction, 29 

Dummy section location assignment, 29, 31 
Duplication factor, 40 
Forcing alignment, 49 


Effective address, length, 35 
EJECT instruction, 51 
END instruction, 57 
ENTRY instruction, 31 

Entry point symbol, identification of, 31 
EQU instruction, 38 

Equal signs, as macro-instruction operands, 
66 

Error message (see MNOTE instruction) 

Error Messages 145 
Explicit addressing, 24, 34 
Length, 34 
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Exponent modifiers, 42 
Expressions, 21, 31 
Absolute, 34 
Evaluation, 22 
Relocatable, 34 
Summary chart of, 124 
Extended mnemonic codes, 36 

Operand format, 37 
Table, 108 

External control section, addressing of, 
31 

External symbol, identification of, 31 
EXTRN instruction, 31 


First control section, 28 

Fixed-point constants, 44 

Format, 44 
Positioning of, 44 
Scaling, 44 

Values, minimum and maximum, 44, 45 
Fixed-point field, integer attribute of, 

74 

Floating-point constants, 45 
Alignment, 46 
Format, 45 
Scale modifiers, 45 
Floating-point field, integer attribute 
of, 74 

Format control, input, 53 


GBLA instruction 
Form of, 88 

Inside macro-definitions, 88 
Outside, macro-definitions, 88 
Use of, 88 
GBLB instruction 
Form of, 88 

Inside macro-definitions, 88 
Outside macro-definitions, 88 
Use of, 88 
GBLC instruction 
Form of, 88 

Inside macro-definitions, 88 
Outside, macro-definitions, 88 
Use of, 88 

General register zero, base register 
usage, 25 

Generated statements, examples of, 64 
Global SET symbols 
Defining, 88 
Examples of, 88 , 90 
Local SET symbols, compared, 87 
Using, 88 

Global variable symbols 
Types of, 87 

(see also global SET symbols, sub¬ 
scripted SET symbols) 


Hexadecimal constants, 43 
Hexadecimal-decimal conversion chart, 98 
Hexadecimal self-defining terms, 18 


I' (see Integer attribute) 


ICTL instruction, 52 
Identification-sequence field, 14 
Identifying blank common control section, 
30 

Identifying assembly output, 51 
Identify dummy section, 29 
Implied addressing, 24, 34 
Length, 34 

Implied length specification, 34 
Inner macro-instruction 
Defined, 68 
Example of, 69 
Symbolic parameters in, 69 
Instruction alignment, 33 
Integer attributed 

Decimal fields, 74 
Examples of,, 74 
Fixed-point fields, 73 
Floating-point fields, 74 
How to compute, 74 
Notation, 71 
Restrictions on use, 74 
Use of, 74 
ISEQ instruction, 53 


K' (see Count attribute) 

Keyword 

Defined, 94 

Keyword macro-instruction, 94 
Symbolic parameter and, 94 
Keyword, inner macro-instructions used 
in, 95 

Keyword macro-definition 

Positional macro-definitions, compared, 
94 

Use, 94 

Keyword macro-instruction 
Example of, 95 
Format of, 94 
Keywords in, 94 
Operands, 58, 94 
Invalid examples, 95 
Valid examples, 95 
Operand sublists in, 95 
Keyword prototype statement 
Examples of, 94 
Format of, 94 
Operands, 94 

Invalid examples, 94 
Valid examples, 94 
Standard values, 94 


L' (see Length attribute) 

LCLA instruction 
Form of, 75 
Use of, 75 
LCLB instruction 
Form of, 75 
Use of, 75 
LCLC instruction 
Form of, 75 
Use of, 75 

Lengths explicit and implied, 34, 35 
Length attribute 

Defined, 34, 72 
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73 


Examples, 73 
Notation, 71 
Restrictions on use, 

Symbols, 17, 73 
Use of, 73 
Length modifier, 40 
Length subfield, 33 
Level of parentheses, 21 

Library, copying coding form, 56 
Linkage symbols (see also ENTRY instruc¬ 
tion, EXTRN instruction) 

Entry point symbol, 31 
External symbol, 31 
Linkage editor, and 
use of, 31 
Listing, spacing, 52 
Listing control instructions, 52 
Literal pools, 20, 54 
Literals, 20 

Character, 34 
DC instruction, used in, 20 
Duplicate, 21 
Format, 20 

Literal pool, beginning, 55 

Literal pools, multiple, 20 

Local SET symbols 
Defining, 88 
Examples of, 88-90 
Global SET symbols, compared 87 
Using, 88 

Local variable symbols 
Types of, 87 
(see also local SET symbols) 

(see also subscripted SET symbols 
Location counter 38, 42, 47 

Predefined symbols, 19 
References to, 19 
Setting, 54 
Logical expressions 

AIF instructions, 82 
Arithmetic relations, 81 
Blanks in, 81 
Character relations 81 
Evaluation of, 81 
Invalid examples of 81 
Logical operators in, 81 
Parenthesized terms in 
Evaluation of, 81 
Examples of, 81 
Relation operators in, 81 
SETB instructions, 80 
Terms allowed in, 81 
Valid examples of, 81 
LTORG instruction, 55 


Machine features required, 7 
Machine-instructions, 33 

Alignment and checking, 33 
Literals, limits on, 20 
Mnemonic operation codes, 35 
Operand fields and subfields, 33 
Symbolic operand formats, 35 
Machine-instruction mnemonic codes, 35 
Alphabetical listing, 108 
MACRO 

Form of, 61 


Use, 61 
Macro-definition 

Compatibiltiy, 97 

Defined, 61 
Example of, 63 
How to prepare, 61 

Keyword (see Keyword macro-definition) 
Mixed-mode (see Mixed-mode macro¬ 
definition) 

Placement in source program, 61 
Use, 61 

Macro-definition exit (see MEXIT instruc¬ 
tion) 

Machine-instruction examples and format 

RR, 33, 35 

RX, 33, 36 

RS, 33, 36 

SI, 33, 36 

SS, 33, 36 

Summary table, 106 

Macro-definition header statement (see 
MACRO) 

Macro-definition trailer statement (see 
MEND) 

Macro facility 

Additional features 86 
Comparison chart, 137 
Relation to assembler language 58 
Summary 85, 121 
Macro-instruction 
Defined, 58 
Example of, 67 
Form of, 66 
How to write, 66 
Levels of, 69 
Mnemonic operation code, 66 
Name entry of, 66 
Omitted operands, 67 
Example of, 67 
Operand entry of, 66 
Operands 

Ampersands, 66 
Blanks, 67 
Commas, 67 
Equal signs, 66 
Paired parentheses, 66 

Paired apostrophes, 66 

Operand sublists, 67 
Operation entry of, 66 
Statement form, 67 
Types of, 58 

Used as model statement, 68 
Macro-instruction index (&SYSNDX) 

AIF instruction, 91 
Arithmetic expressions, 91 
Character relation, 91 
Example, 92 
MNOTE instruction, 91 
SETB instruction, 91 

SETC instruction, 91 

Use of, 91 

Macro-instruction operand (&SYSLIST) 
Attributes of, 93 
Use of, 93 

(see also symbolic parameters) 
Macro-instruction prototype statement 
(see Prototype statement) 
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Macro-instruction statement (see Macro¬ 
instruction) 

MEND 

Form of, 61 

MEXIT instruction, contrasted, 86 
Use of, 61 
MEXIT instruction 
Example of, 86 
Form of, 86 
MEND, contrasted, 86 
Use of, 86 

Mixed-mode macro-definitions 

Positional macro-definitions, 
contrasted, 96 
Use, 96 

Mixed-mode macro-instruction 
Example of, 96 
Form of, 96 

Operand field of, 58, 96 
Mixed-mode prototype statement 
Example of, 96 
Form of, 96 
Operands of, 96 
Mnemonic operation codes, 35 
Extended, 37 
Machine-instruction, 35 
Macro-instruction, 61 
MNOTE instruction 

Ampersands in, 86 

Error message, 86 

Example of, 86 
Operand entry of, 86 
Apostrophes in, 86 
Severity code, 86 
Use of, 86 
Model statements 

Comments field of, 63 
Comments statements, 65 
Defined, 62 
Name field of, 62 
Operation field of, 62 
Operand field of, 63 
Use of, 62 


N' (see Number attribute) 
Name entries, 13 
Number attribute 
Defined, 73 
Notation, 73 
Operand sublist, 73 


Operands 

Entries, 13 
Fields, 33 
Subfields, 33, 34 
Symbolic, 31, 33, 35 
Operand Sublist 

Alternate statement form, 67 
Defined, 67 
Example of, 68 
Use of, 67 
Operation field, 33 

Ordinary symbol, 17 

ORG instruction, 54 

Outer macro-instruction defined, 68 


Paired parentheses, 66 
Paired apostrophes, 66 
Parentheses in 

Arithmetic expressions, 76 
Logical expressions, 81 
Macro- instruction operands, 66 
Operand fields and subfields, 34 
Paired, 66 
Period in 

Character expressions, 78 
Comments statements, 65 
Concatenation, 65 
Sequence symbols, 74 
Positional macro-definition (see Macro¬ 
definition) 

Positional macro-instruction (see Macro¬ 
definition) 

Positional macro-instruction (see Macro¬ 
instruction) 58 
Previously defined symbols, 18 
PRINT instruction, 52 
Program control instructions, 53 
Program listings, 10 
Program sectioning and linking, 24 
Prototype statement 
Example of, 62 
Form of, 61 

Keyword (see Keyword prototype state¬ 
ment) 

Mixed-mode (see Mixed-mode prototype 
statement) 

Name entry of, 61 
Operand entry of, 61 
Operation entry of, 61 
Statement form, 61 
Symbolic parameters in, 61 
Use of, 61 
PUNCH instruction, 54 

Relational operators, 81 
Relative addressing, 26 
Relocatability, 15, 10 

Attributes, 31 

Program, general register zero, 25 
Relocatable expressions, 23, 33 
In USING instructions, 25 
Relocatable symbols, 17 
Relocatable terms 
Pairing of, 22 

In relocatable expressions, 23 
REPRO instruction, 54 
RR machine-instruction format, 33 
Length attribute, 33 
Symbolic operands, 35 
RS machine-instruction format, 33 
Address specification, 34 
Length attribute, 33 
Symbolic operands, 35 
RX machine-instruction format, 33 
Address specification, 34 
Length attribute, 33 
Symbolic operands, 35 

S' (see Scaling attribute) 

Sample program, 131 
Scale modifier 
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Fixed-point constants, 41 

Floating-point constants, 41 

Scaling attribute 

Decimal fields, 73 
Defined, 73 
Fixed-point fields, 73 
Floating-point fields, 73 
Notation, 89 
Restrictions on use, 73 
Symbols, 73 
Use of, 73 

Self-defining terms, 18 
(see also specific terms) 

Sequence checking, 53 
Sequence symbols, 17, 74 

AGO instruction, 83 » 

AIF instruction, 82 

ANOP instruction, 84 
How to write, 73 
Invalid examples of, 74 
Macro instruction, 74 
Use of, 74 
Valid examples of, 74 
Set symbols 

Assigning values to, 70 
Defining, 70 

Symbolic parameters, contrasted, 70 
Use, 70 

(see also local SET symbols) 

(see also global SET symbols) 

(see also subscripted SET symbols) 

SET variable, 90 
SETA instruction 

Examples of, 76, 77 
Form of, 75 
Operand entry of, 75 

Evaluation procedure, 76 
Operators allowed, 75 
Parenthesized terms, 76 
Terms allowed, 75 
Valid examples of, 75 
Operand sublist, 77 
Example, 77 
SETB instruction 
Example of, 82 
Form of, 80 

Logical expression in, 81 
Arithmetic relations, 81 
Blanks in, 81 
Character relations, 81 
Evaluation of, 81 
Operators allowed, 81 
Operand entry of, 80 

Invalid examples of, 81 
Valid examples of, 81 
SETC instruction 

Apos trophe s, 78 

Character expressions in, 78 
Ampersands, 78 
Periods, 7 8 

Concatenation in 

Character expressions, 79 
Substring notations, 79 
Examples of, 77-80 
Form of, 77 
Operand entry of, 77 
Substring notations in, 78 


Arithmetic expressions in, 79 
Character expressions in, 79 
Invalid examples of, 79 
Valid examples of, 79 
Type attribute in, 77 
Example of, 78 
SETA symbol 

Assigning values to, 70 
Defining, 70 
SETA instruction, 76 

Using, 76 
SETB symbol 

AIF instruction, 82 
Assigning values to, 70 
Defining, 70 
SETA instruction, 82 

SETB instruction, 82 

SETC ins truetion, 8 2 

Using, 82 
SETC symbol 

Assigning values to, 70 
Defining, 70 
SETA instruction, 81 

Using, 80 
Severity Code 144 

Severity code in MNOTE instruction, 87 
SI machine-instruction format, 39 
Address specification, 34 
Length attribute, 33 
Symbolic operands, 35 
Source statement library defined, 59 
SPACE instruction, 52 
SS machine-instruction format, 33 
Address specification, 34 
Length attribute, 33 
Length field, 34 
Symbolic operands, 35 
START instruction 

Positioning of, 27 
Unnamed control sections, 28 
Statements, 11, 13 
Boundaries, 11 

Examples, 13 
Macro-instructions, 6 6 

Prototype, 61 
Summary of, 119 

Storage, defining (see DS instruction) 

S-type address constant 48 
Sublist (see Operand sublist) 

Subscripted SET symbols 
Defining, 90 
Examples, 91 
Dimension of, 91 

How to write, 90 

Invalid examples of, 90 
Subscript of, 91 
Using, 91 

Examples, 91 
Valid examples of, 90 
Substring notation 

Arithmetic expressions in, 79 
Character expression in, 79 
How to write, 79 
Invalid example of, 79 
SETB instruction, 81 

SETC instruction, 79 

Valid examples of, 79 
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Symbol definition, EQU instruction for, 38 
Symbols 

Defining, 17 
Length attribi^tes, 33 
Referring to, 21 
Length, maximum, 18 
Previously defined, 18 
Restrictions, 18 
Symbol table capacity, 126 
Types of, 17 
Value attributes, 33 
Symbolic linkages, 31 
Symbolic operand formats, 35 
Symbolic parameter 

Comments field, 63 
Concatenation of, 64 
Defined, 63 
How to write, 63 
Invalid examples of, 63 
Model statements, 63 
Prototype statement, 62 
Replaced by, 63 
Valid example of, 63 
System variable symbols 

Assigned values by assembler, 91 
Defined, 91 

(see also specific system variable 
symbols) 


T* (see Type attribute) 


Tables, internal, capacity of, 126 
Terms 

Expressions composed of, 15 
Pairing of, 22 
TITLE instruction, 51 
Type attribute 
Defined, 72 
Literals, 72 

Macro-instruction operands, 72 
Notation, 71 
SETC instruction, 77 
Use, 72 


Unconditional branch (see AGO instruction) 
Unnamed control section 28 
USING instruction, 24, 33 


Variable symbols, 17 

Assigning values to, 59 
Defined, 59 
How to write, 59 
Summary chart of, 125 
Types of, 59 
Use, 59 

(see also specific variable symbols) 
V-type address constant, 48 


XFR instruction, 8 


Y-type address constant, 47 
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